Changeset 91 for trunk/Forms/UFormMain.lfm

Timestamp:

Jul 20, 2018, 9:41:37 AM (6 years ago)

Author:

chronos

Message:

• Added: Allow to enable individual code optimization from settings dialog.
• Added: Actions to format or shrink target BF code.

Location:

trunk/Forms

Files:

• . (modified) (1 prop)
• UFormMain.lfm (modified) (16 diffs)

trunk/Forms/UFormMain.lfm

@@ -1 +1 @@
 object FormMain: TFormMain
-  Left = 490
+  Left = 405
   Height = 586
-  Top = 315
+  Top = 226
   Width = 860
   Caption = 'LazFuck'
-  ClientHeight = 554
+  ClientHeight = 561
   ClientWidth = 860
+  DesignTimePPI = 120
   Menu = MainMenu1
   OnClose = FormClose
@@ -13 +14 @@
   OnDestroy = FormDestroy
   OnShow = FormShow
-  LCLVersion = '1.6.4.0'
+  LCLVersion = '1.8.2.0'
   WindowState = wsMaximized
   object StatusBarMain: TStatusBar
     Left = 0
     Height = 28
-    Top = 526
+    Top = 533
     Width = 860
     Panels = <    
@@ -47 +48 @@
     end
     object ToolButton2: TToolButton
-      Left = 24
+      Left = 30
       Top = 2
       Action = AProjectOpen
@@ -54 +55 @@
     end
     object ToolButton3: TToolButton
-      Left = 59
+      Left = 74
       Top = 2
       Action = AProjectSave
     end
     object ToolButton4: TToolButton
-      Left = 82
+      Left = 103
       Top = 2
       Action = AProjectClose
     end
     object ToolButton5: TToolButton
-      Left = 128
-      Height = 22
-      Top = 2
-      Width = 10
+      Left = 161
+      Height = 28
+      Top = 2
       Style = tbsSeparator
     end
     object ToolButton6: TToolButton
-      Left = 161
+      Left = 198
       Top = 2
       Action = AProgramRun
     end
     object ToolButton7: TToolButton
-      Left = 138
+      Left = 169
       Top = 2
       Action = AProgramCompile
     end
     object ToolButton8: TToolButton
-      Left = 105
+      Left = 132
       Top = 2
       Action = AOptions
     end
     object ToolButton9: TToolButton
-      Left = 230
+      Left = 285
       Top = 2
       Action = ABreakpointToggle
     end
     object ToolButton10: TToolButton
-      Left = 184
+      Left = 227
       Top = 2
       Action = AProgramPause
     end
     object ToolButton11: TToolButton
-      Left = 207
+      Left = 256
       Top = 2
       Action = AProgramStop
     end
     object ToolButton12: TToolButton
-      Left = 253
+      Left = 314
       Top = 2
       Action = AProgramStepOver
     end
     object ToolButton13: TToolButton
-      Left = 276
+      Left = 343
       Top = 2
       Action = AProgramStepInto
     end
     object ToolButton14: TToolButton
-      Left = 299
+      Left = 372
       Top = 2
       Action = AProgramStepOut
     end
     object ToolButton15: TToolButton
-      Left = 322
+      Left = 401
       Top = 2
       Action = AProgramRunToCursor
     end
     object ToolButtonTarget: TToolButton
-      Left = 345
+      Left = 430
       Hint = 'Target select'
       Top = 2
@@ -131 +131 @@
   object PageControlRight: TPageControl
     Left = 467
-    Height = 500
+    Height = 507
     Top = 26
     Width = 393
@@ -141 +141 @@
     object TabSheetDebug: TTabSheet
       Caption = 'Debug'
-      ClientHeight = 494
-      ClientWidth = 319
+      ClientHeight = 499
+      ClientWidth = 359
       object PanelInput: TPanel
         Left = 0
         Height = 64
         Top = 0
-        Width = 319
+        Width = 359
         Align = alTop
         BevelOuter = bvNone
@@ -157 +157 @@
         Height = 5
         Top = 64
-        Width = 319
+        Width = 359
         Align = alTop
         ResizeAnchor = akTop
@@ -165 +165 @@
         Height = 259
         Top = 69
-        Width = 319
+        Width = 359
         Align = alTop
         BevelOuter = bvNone
@@ -175 +175 @@
         Height = 5
         Top = 328
-        Width = 319
+        Width = 359
         Align = alTop
         ResizeAnchor = akTop
@@ -183 +183 @@
         Height = 86
         Top = 333
-        Width = 319
+        Width = 359
         Align = alTop
         BevelOuter = bvNone
@@ -193 +193 @@
         Height = 5
         Top = 419
-        Width = 319
+        Width = 359
         Align = alTop
         ResizeAnchor = akTop
@@ -199 +199 @@
       object PanelMemory: TPanel
         Left = 0
-        Height = 70
+        Height = 75
         Top = 424
-        Width = 319
+        Width = 359
         Align = alClient
         BevelOuter = bvNone
@@ -210 +210 @@
   object Splitter1: TSplitter
     Left = 462
-    Height = 500
+    Height = 507
     Top = 26
     Width = 5
@@ -218 +218 @@
   object PanelLeft: TPanel
     Left = 0
-    Height = 500
+    Height = 507
     Top = 26
     Width = 462
     Align = alClient
     BevelOuter = bvNone
-    ClientHeight = 500
+    ClientHeight = 507
     ClientWidth = 462
     TabOrder = 4
     object PageControlMain: TPageControl
       Left = 0
-      Height = 377
+      Height = 384
       Top = 0
       Width = 462
@@ -246 +246 @@
       Left = 0
       Height = 118
-      Top = 382
+      Top = 389
       Width = 462
       ActivePage = TabSheetMessages
@@ -261 +261 @@
       Left = 0
       Height = 5
-      Top = 377
+      Top = 384
       Width = 462
       Align = alBottom