Changeset 19 for trunk/Forms

Timestamp:

Oct 5, 2019, 1:00:29 PM (5 years ago)

Author:

chronos

Message:

• Added: Remember board state between application restarts.

Location:

trunk/Forms

Files:

• UFormMain.pas (modified) (1 diff)
• UFormSettings.lfm (modified) (2 diffs)
• UFormSettings.lrj (modified) (1 diff)

trunk/Forms/UFormMain.pas

@@ -89 +89 @@
   Core.PersistentForm1.RegistryContext := Core.ApplicationInfo1.GetRegistryContext;
   Core.PersistentForm1.Load(Self);
-  Core.Game.New;
+  if not Core.Game.Running then
+    Core.Game.New;
 end;
 

trunk/Forms/UFormSettings.lfm

@@ -16 +16 @@
     Height = 26
     Top = 24
-    Width = 150
-    Caption = 'Animation speed:'
+    Width = 172
+    Caption = 'Animation duration:'
     ParentColor = False
   end
@@ -52 +52 @@
   object ComboBoxLanguage: TComboBox
     Left = 208
-    Height = 43
+    Height = 42
     Top = 86
     Width = 230

trunk/Forms/UFormSettings.lrj

@@ -1 +1 @@
 {"version":1,"strings":[
 {"hash":213582195,"name":"tformsettings.caption","sourcebytes":[83,101,116,116,105,110,103,115],"value":"Settings"},
-{"hash":69745274,"name":"tformsettings.label1.caption","sourcebytes":[65,110,105,109,97,116,105,111,110,32,115,112,101,101,100,58],"value":"Animation speed:"},
+{"hash":10139450,"name":"tformsettings.label1.caption","sourcebytes":[65,110,105,109,97,116,105,111,110,32,100,117,114,97,116,105,111,110,58],"value":"Animation duration:"},
 {"hash":1339,"name":"tformsettings.buttonok.caption","sourcebytes":[79,75],"value":"OK"},
 {"hash":77089212,"name":"tformsettings.buttoncancel.caption","sourcebytes":[67,97,110,99,101,108],"value":"Cancel"},