Changeset 36 for trunk/UCore.pas

Timestamp:

Oct 13, 2019, 5:14:50 PM (5 years ago)

Author:

chronos

Message:

• Fixed: Missing UFormHistory files.
• Added: Allow to disable moves history recording.

File:

• trunk/UCore.pas (modified) (3 diffs)

trunk/UCore.pas

@@ -88 +88 @@
   FormSettings := TFormSettings.Create(nil);
   try
-    FormSettings.ShowModal;
+    if FormSettings.ShowModal = mrOk then begin
+      FormMain.UpdateInterface;
+      UpdateInterface;
+    end;
   finally
     FreeAndNil(FormSettings);
@@ -153 +156 @@
       FormNew.Save(Core.Game);
       Game.New;
+      UpdateInterface;
+      FormMain.UpdateInterface;
     end;
   finally
@@ -184 +189 @@
 begin
   AUndo.Enabled := Game.CanUndo;
+  AHistory.Enabled := Game.RecordHistory;
   {$IFDEF DEBUG}
   AComputer.Enabled := True;