Changeset 32 for trunk/UFormMain.pas


Ignore:
Timestamp:
Mar 4, 2014, 11:40:01 PM (11 years ago)
Author:
chronos
Message:
  • Fixed: Do not update player move settings if not comfirmed by hitting Ok button.
  • Modified: Automatic pairing player moves objects with CellFrom and CellTo.
Location:
trunk
Files:
2 edited

Legend:

Unmodified
Added
Removed

  • trunk

    • Property svn:ignore

      •  

        old new  
        44xtactics.res
        55xtactics.dbg
         6heaptrclog.trc

  • trunk/UFormMain.pas

    r30 r32  
    187187    if Assigned(Cell) then begin
    188188      Core.Game.CurrentPlayer.View.FocusedCell := Cell;
    189       StatusBar1.Panels[0].Text := '[' + IntToStr(Cell.Pos.X) + ', ' + IntToStr(Cell.Pos.Y) + ']';
     189      StatusBar1.Panels[0].Text := '[' + IntToStr(Cell.Pos.X) + ', ' + IntToStr(Cell.Pos.Y) + '] (' + IntToStr(Cell.MovesFrom.Count) + ', ' + IntToStr(Cell.MovesTo.Count) + ')';
    190190    end else begin
    191191      Core.Game.CurrentPlayer.View.FocusedCell := nil;
Note: See TracChangeset for help on using the changeset viewer.