- Fixed TfrmMain.SetCurrentTile to exit only under correct conditions

- Fixed ghost tile creation to handle random height
- Changed UpdateSelection to only process the selection changes if necessary
- Changed TMapCell.GhostZ to be readable (necessary for simplier increase with random altitude)

UOLib/UMap.pas

@@ -52,7 +52,7 @@ type
   public
     property Altitude: ShortInt read GetZ write SetZ;
     property IsGhost: Boolean read FIsGhost write FIsGhost;
-    property GhostZ: ShortInt write FGhostZ;
+    property GhostZ: ShortInt read FGhostZ write FGhostZ;
     property GhostID: Word write FGhostID;
 
     function Clone: TMapCell; override;