Changeset 20 for trunk/Forms/UFormNew.pas

Timestamp:

Oct 5, 2019, 2:00:50 PM (5 years ago)

Author:

chronos

Message:

• Added: Player can undo last move.
• Modified: Optimized code of TGame.CanMove method.

File:

• trunk/Forms/UFormNew.pas (modified) (1 diff)

trunk/Forms/UFormNew.pas

@@ -45 +45 @@
 procedure TFormNew.Load(Game: TGame);
 begin
-  ComboBoxSize.ItemIndex := Game.Board.Size.X - 3;
+  ComboBoxSize.ItemIndex := Game.Board.Size.X - 2;
 end;
 
 procedure TFormNew.Save(Game: TGame);
 begin
-  Game.Board.Size := Point(3 + ComboBoxSize.ItemIndex, 3 + ComboBoxSize.ItemIndex);
+  Game.Board.Size := Point(2 + ComboBoxSize.ItemIndex, 2 + ComboBoxSize.ItemIndex);
 end;