Changeset 52 for trunk/Forms/UFormMain.pas
- Timestamp:
- Aug 17, 2014, 2:10:09 PM (10 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/Forms/UFormMain.pas
r46 r52 299 299 if Assigned(Cell) then begin 300 300 Core.Game.CurrentPlayer.View.FocusedCell := Cell; 301 StatusBar1.Panels[0].Text := '[' + IntToStr(Cell.Pos .X) + ', ' + IntToStr(Cell.Pos.Y) +301 StatusBar1.Panels[0].Text := '[' + IntToStr(Cell.PosPx.X) + ', ' + IntToStr(Cell.PosPx.Y) + 302 302 '] (' + IntToStr(Cell.MovesFrom.Count) + ', ' + IntToStr(Cell.MovesTo.Count) + ')'; 303 303 end else begin
Note:
See TracChangeset
for help on using the changeset viewer.