Changeset 365 for trunk/Packages/Common/Forms/FormKeyShortcuts.lfm

Timestamp:

Jan 2, 2025, 2:29:10 PM (5 days ago)

Author:

chronos

Message:

• Modified: OK button moved to be on the left side of buttons.
• Modified: Allow to run test from test form.
• Fixed: Free tests during test list form close.

File:

• trunk/Packages/Common/Forms/FormKeyShortcuts.lfm (modified) (5 diffs)

trunk/Packages/Common/Forms/FormKeyShortcuts.lfm

@@ -1 +1 @@
 object FormKeyShortcuts: TFormKeyShortcuts
   Left = 839
-  Height = 274
+  Height = 329
   Top = 609
-  Width = 587
+  Width = 704
   Caption = 'Key shortcuts'
-  ClientHeight = 274
-  ClientWidth = 587
-  DesignTimePPI = 120
+  ClientHeight = 329
+  ClientWidth = 704
+  DesignTimePPI = 144
   OnCreate = FormCreate
   OnDestroy = FormDestroy
@@ -13 +13 @@
   LCLVersion = '3.6.0.0'
   object ListView1: TListView
-    Left = 8
-    Height = 212
-    Top = 8
-    Width = 571
+    Left = 10
+    Height = 262
+    Top = 10
+    Width = 684
     Align = alTop
     Anchors = [akTop, akLeft, akRight, akBottom]
-    BorderSpacing.Around = 8
+    BorderSpacing.Around = 10
     Columns = <    
       item
         Caption = 'Action'
-        Width = 200
+        Width = 240
       end    
       item
         Caption = 'Window'
-        Width = 200
+        Width = 240
       end    
       item
         Caption = 'Shortcut'
-        Width = 166
+        Width = 199
       end>
     OwnerData = True
@@ -44 +44 @@
   end
   object ButtonClose: TButton
-    Left = 485
-    Height = 31
-    Top = 232
-    Width = 94
+    Left = 581
+    Height = 37
+    Top = 284
+    Width = 113
     Anchors = [akRight, akBottom]
     Caption = 'Close'
@@ -55 +55 @@
   end
   object PopupMenu1: TPopupMenu
-    Left = 340
-    Top = 120
+    Left = 408
+    Top = 144
     object MenuItem1: TMenuItem
       Caption = 'Execute'
@@ -67 +67 @@
     Column = 0
     Order = soNone
-    Left = 184
-    Top = 120
+    Left = 221
+    Top = 144
   end
 end