Changeset 11 for trunk/Forms/UFormMain.lfm

Timestamp:

Oct 4, 2019, 11:57:05 PM (5 years ago)

Author:

chronos

Message:

• Added: Configurable speed of animations.

File:

• trunk/Forms/UFormMain.lfm (modified) (2 diffs)

trunk/Forms/UFormMain.lfm

@@ -20 +20 @@
       Caption = 'Game'
       object MenuItemNew: TMenuItem
-        Action = AGameNew
+        Action = Core.AGameNew
+      end
+      object MenuItem1: TMenuItem
+        Action = Core.ASettings
       end
       object MenuItemExit: TMenuItem
-        Action = AExit
+        Action = Core.AExit
       end
     end
@@ -29 +32 @@
       Caption = 'Help'
       object MenuItemAbout: TMenuItem
-        Action = AAbout
+        Action = Core.AAbout
       end
     end
   end
-  object ActionList1: TActionList
-    left = 144
+  object TimerDraw: TTimer
+    Interval = 20
+    OnTimer = TimerDrawTimer
+    left = 138
     top = 152
-    object AGameNew: TAction
-      Caption = 'New...'
-      OnExecute = AGameNewExecute
-    end
-    object AExit: TAction
-      Caption = 'Exit'
-      OnExecute = AExitExecute
-    end
-    object AAbout: TAction
-      Caption = 'About'
-      OnExecute = AAboutExecute
-    end
   end
 end