Changeset 62 for trunk/Forms/UFormMain.lfm

Timestamp:

Jan 5, 2023, 10:14:31 PM (23 months ago)

Author:

chronos

Message:

• Modified: Hide main menu in full screen mode.
• Modified: Use colors as player names.
• Modified: Use black background around player frames.

File:

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

trunk/Forms/UFormMain.lfm

@@ -1 +1 @@
 object FormMain: TFormMain
   Left = 692
-  Height = 536
+  Height = 617
   Top = 479
-  Width = 668
+  Width = 770
   Caption = 'Tunneler'
-  ClientHeight = 506
-  ClientWidth = 668
-  DesignTimePPI = 125
+  ClientHeight = 583
+  ClientWidth = 770
+  DesignTimePPI = 144
   Menu = MainMenu1
   OnClose = FormClose
@@ -19 +19 @@
   object StatusBar1: TStatusBar
     Left = 0
-    Height = 24
-    Top = 482
-    Width = 668
+    Height = 28
+    Top = 555
+    Width = 770
     Panels = <    
       item
-        Width = 64
+        Width = 74
       end    
       item
-        Width = 64
+        Width = 74
       end    
       item
-        Width = 64
+        Width = 74
       end    
       item
-        Width = 64
+        Width = 74
       end    
       item
-        Width = 64
+        Width = 74
       end    
       item
-        Width = 64
+        Width = 74
       end    
       item
-        Width = 64
+        Width = 74
       end>
     ParentFont = False
@@ -50 +50 @@
   object Image1: TImage
     Left = 0
-    Height = 482
+    Height = 555
     Top = 0
-    Width = 668
+    Width = 770
     Align = alClient
     OnResize = Image1Resize
@@ -59 +59 @@
     Interval = 50
     OnTimer = TimerDrawTimer
-    Left = 129
-    Top = 66
+    Left = 149
+    Top = 76
   end
   object MainMenu1: TMainMenu
-    Left = 240
-    Top = 21
+    Left = 276
+    Top = 24
     object MenuItem1: TMenuItem
       Caption = 'Game'
@@ -92 +92 @@
   object TimerEngineTick: TTimer
     Interval = 20
-    OnTimer = TimerEngineTickTimer
-    Left = 125
-    Top = 135
+    Left = 144
+    Top = 156
   end
   object ActionList1: TActionList
-    Left = 375
-    Top = 42
+    Left = 432
+    Top = 48
     object AFullScreen: TAction
       Caption = 'Fullscreen mode'
@@ -132 +131 @@
     RootName = 'CONFIG'
     ReadOnly = False
-    Left = 129
-    Top = 313
+    Left = 149
+    Top = 361
   end
   object AboutDialog1: TAboutDialog
@@ -139 +138 @@
     ThemeManager = Core.ThemeManager1
     ApplicationInfo = Core.ApplicationInfo
-    Left = 267
-    Top = 157
+    Left = 308
+    Top = 181
   end
 end