Changeset 46 for trunk/Forms/UFormMain.lfm

Timestamp:

Aug 16, 2014, 11:02:07 PM (10 years ago)

Author:

chronos

Message:

• Added: Support for switching large icons in toolbar.

File:

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

trunk/Forms/UFormMain.lfm

@@ -5 +5 @@
   Width = 775
   Caption = 'xTactics'
-  ClientHeight = 595
+  ClientHeight = 592
   ClientWidth = 775
   Menu = MainMenu1
@@ -17 +17 @@
   object PaintBox1: TPaintBox
     Left = 0
-    Height = 537
+    Height = 531
     Top = 32
     Width = 775
@@ -32 +32 @@
   object StatusBar1: TStatusBar
     Left = 0
-    Height = 26
-    Top = 569
+    Height = 29
+    Top = 563
     Width = 775
     Panels = <    
@@ -55 +55 @@
     Images = Core.ImageListSmall
     ParentShowHint = False
+    PopupMenu = PopupMenuToolbar
     ShowHint = True
     TabOrder = 1
@@ -125 +126 @@
         Action = AZoomOut
       end
+      object MenuItem19: TMenuItem
+        Caption = '-'
+      end
+      object MenuItem20: TMenuItem
+        Action = AToolBarBigIcons
+      end
     end
     object MenuItem8: TMenuItem
@@ -164 +171 @@
       ShortCut = 16449
     end
+    object AToolBarBigIcons: TAction
+      Caption = 'Toolbar big icons'
+      OnExecute = AToolBarBigIconsExecute
+    end
+  end
+  object PopupMenuToolbar: TPopupMenu
+    left = 452
+    top = 98
+    object MenuItem18: TMenuItem
+      Action = AToolBarBigIcons
+    end
   end
 end