Changeset 365 for trunk/Packages/Common/Forms/FormTest.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/FormTest.lfm (modified) (2 diffs)

trunk/Packages/Common/Forms/FormTest.lfm

@@ -8 +8 @@
   ClientWidth = 865
   DesignTimePPI = 144
-  LCLVersion = '2.2.6.0'
+  OnShow = FormShow
+  LCLVersion = '3.6.0.0'
   object MemoLog: TMemo
     Left = 8
-    Height = 505
+    Height = 464
     Top = 8
     Width = 849
-    Align = alClient
+    Align = alTop
+    Anchors = [akTop, akLeft, akRight, akBottom]
     BorderSpacing.Around = 8
     ReadOnly = True
@@ -20 +22 @@
     TabOrder = 0
   end
+  object ButtonRun: TButton
+    Left = 616
+    Height = 37
+    Top = 480
+    Width = 112
+    Anchors = [akRight, akBottom]
+    Caption = 'Run'
+    TabOrder = 1
+    OnClick = ButtonRunClick
+  end
+  object ButtonClose: TButton
+    Left = 745
+    Height = 37
+    Top = 480
+    Width = 112
+    Anchors = [akRight, akBottom]
+    Caption = 'Close'
+    ModalResult = 11
+    TabOrder = 2
+    OnClick = ButtonRunClick
+  end
 end