Changeset 445 for GraphicTest/UMainForm.lfm

Timestamp:

Nov 22, 2012, 1:32:52 PM (12 years ago)

Author:

chronos

Message:

• Added: Allow control draw form DoubleBuffer and EraseBackground.

File:

• GraphicTest/UMainForm.lfm (modified) (12 diffs)

GraphicTest/UMainForm.lfm

@@ -1 +1 @@
 object MainForm: TMainForm
-  Left = 187
-  Height = 440
-  Top = 107
-  Width = 549
+  Left = 302
+  Height = 308
+  Top = 181
+  Width = 554
   Caption = 'Graphic test'
-  ClientHeight = 440
-  ClientWidth = 549
+  ClientHeight = 308
+  ClientWidth = 554
   OnClose = FormClose
   OnCreate = FormCreate
@@ -14 +14 @@
   object ListViewMethods: TListView
     Left = 8
-    Height = 364
+    Height = 232
     Top = 8
-    Width = 537
+    Width = 542
     Anchors = [akTop, akLeft, akRight, akBottom]
     Columns = <    
@@ -50 +50 @@
     Left = 8
     Height = 25
-    Top = 379
+    Top = 247
     Width = 115
     Anchors = [akLeft, akBottom]
@@ -60 +60 @@
     Left = 136
     Height = 25
-    Top = 379
+    Top = 247
     Width = 112
     Anchors = [akLeft, akBottom]
@@ -70 +70 @@
     Left = 88
     Height = 21
-    Top = 411
+    Top = 279
     Width = 58
     Anchors = [akLeft, akBottom]
@@ -82 +82 @@
     Left = 256
     Height = 25
-    Top = 379
+    Top = 247
     Width = 75
     Anchors = [akLeft, akBottom]
@@ -92 +92 @@
     Left = 8
     Height = 13
-    Top = 415
+    Top = 283
     Width = 69
     Anchors = [akLeft, akBottom]
@@ -101 +101 @@
     Left = 152
     Height = 13
-    Top = 415
+    Top = 283
     Width = 5
     Anchors = [akLeft, akBottom]
@@ -108 +108 @@
   end
   object SpinEditWidth: TSpinEdit
-    Left = 363
+    Left = 219
     Height = 21
-    Top = 411
+    Top = 279
     Width = 58
     Anchors = [akLeft, akBottom]
@@ -119 +119 @@
   end
   object SpinEditHeight: TSpinEdit
-    Left = 432
+    Left = 288
     Height = 21
-    Top = 411
+    Top = 279
     Width = 58
     Anchors = [akLeft, akBottom]
@@ -130 +130 @@
   end
   object Label3: TLabel
-    Left = 328
+    Left = 184
     Height = 13
-    Top = 416
+    Top = 284
     Width = 23
     Anchors = [akLeft, akBottom]
@@ -139 +139 @@
   end
   object Label4: TLabel
-    Left = 424
+    Left = 280
     Height = 13
-    Top = 415
+    Top = 283
     Width = 6
     Anchors = [akLeft, akBottom]
     Caption = 'x'
     ParentColor = False
+  end
+  object CheckBoxDoubleBuffered: TCheckBox
+    Left = 408
+    Height = 17
+    Top = 247
+    Width = 98
+    Anchors = [akLeft, akBottom]
+    Caption = 'Double buffered'
+    OnChange = CheckBoxDoubleBufferedChange
+    TabOrder = 7
+  end
+  object CheckBoxEraseBackground: TCheckBox
+    Left = 408
+    Height = 17
+    Top = 264
+    Width = 106
+    Anchors = [akLeft, akBottom]
+    Caption = 'Erase background'
+    OnChange = CheckBoxEraseBackgroundChange
+    TabOrder = 8
   end
   object Timer1: TTimer