Changeset 15 for trunk/Forms/UFormField.lfm

Timestamp:

Mar 22, 2018, 8:31:19 PM (7 years ago)

Author:

chronos

Message:

• Modified: Update Common and CollTranslator packages to fix build under Lazarus 1.8.
• Fixed: Some memory leaks.

File:

• trunk/Forms/UFormField.lfm (modified) (22 diffs)

trunk/Forms/UFormField.lfm

@@ -10 +10 @@
   OnShow = FormShow
   Position = poMainFormCenter
-  LCLVersion = '1.5'
+  LCLVersion = '1.8.0.4'
   object EditName: TEdit
     Left = 168
-    Height = 35
+    Height = 36
     Top = 11
     Width = 264
@@ -20 +20 @@
   object Label1: TLabel
     Left = 17
-    Height = 25
+    Height = 26
     Top = 21
-    Width = 62
+    Width = 56
     Caption = 'Name:'
     ParentColor = False
@@ -38 +38 @@
   object EditTextBefore: TEdit
     Left = 167
-    Height = 35
+    Height = 36
     Top = 88
     Width = 265
@@ -45 +45 @@
   object Label2: TLabel
     Left = 16
-    Height = 25
+    Height = 26
     Top = 98
-    Width = 110
+    Width = 101
     Caption = 'Text before:'
     ParentColor = False
@@ -53 +53 @@
   object EditTextAfter: TEdit
     Left = 167
-    Height = 35
+    Height = 36
     Top = 136
     Width = 265
@@ -60 +60 @@
   object Label3: TLabel
     Left = 16
-    Height = 25
+    Height = 26
     Top = 144
-    Width = 93
+    Width = 86
     Caption = 'Text after:'
     ParentColor = False
@@ -68 +68 @@
   object Label4: TLabel
     Left = 17
-    Height = 25
+    Height = 26
     Top = 56
-    Width = 94
+    Width = 87
     Caption = 'Data type:'
     ParentColor = False
@@ -76 +76 @@
   object ComboBoxType: TComboBox
     Left = 167
-    Height = 37
+    Height = 40
     Top = 48
     Width = 265
@@ -99 +99 @@
     Top = 184
     Width = 936
-    ActivePage = TabSheetFloat
+    ActivePage = TabSheetBoolean
     Anchors = [akTop, akLeft, akRight, akBottom]
     ShowTabs = False
-    TabIndex = 4
+    TabIndex = 3
     TabOrder = 6
     object TabSheetString: TTabSheet
-      Caption = 'TabSheetString'
       ClientHeight = 194
       ClientWidth = 930
       object EditStringDefault: TEdit
         Left = 160
-        Height = 35
+        Height = 36
         Top = 8
         Width = 265
@@ -117 +116 @@
       object Label5: TLabel
         Left = 16
-        Height = 25
+        Height = 26
         Top = 8
-        Width = 127
+        Width = 117
         Caption = 'Default value:'
         ParentColor = False
@@ -125 +124 @@
     end
     object TabSheetInteger: TTabSheet
-      Caption = 'TabSheetInteger'
       ClientHeight = 194
       ClientWidth = 930
       object Label10: TLabel
         Left = 12
-        Height = 25
+        Height = 26
         Top = 21
-        Width = 96
+        Width = 87
         Caption = 'Minimum:'
         ParentColor = False
@@ -138 +136 @@
       object SpinEditMin: TSpinEdit
         Left = 153
-        Height = 35
+        Height = 36
         Top = 19
         Width = 255
@@ -146 +144 @@
       object SpinEditMax: TSpinEdit
         Left = 153
-        Height = 35
+        Height = 36
         Top = 56
         Width = 255
@@ -153 +151 @@
       object Label11: TLabel
         Left = 12
-        Height = 25
+        Height = 26
         Top = 58
-        Width = 100
+        Width = 91
         Caption = 'Maximum:'
         ParentColor = False
@@ -161 +159 @@
     end
     object TabSheetDateTime: TTabSheet
-      Caption = 'TabSheetDateTime'
       ClientHeight = 194
       ClientWidth = 930
       object DateEditMin: TDateEdit
         Left = 136
-        Height = 35
+        Height = 36
         Top = 24
         Width = 216
         CalendarDisplaySettings = [dsShowHeadings, dsShowDayNames]
-        OKCaption = 'OK'
-        CancelCaption = 'Cancel'
         DateOrder = doNone
         ButtonWidth = 23
@@ -180 +175 @@
       object Label6: TLabel
         Left = 16
-        Height = 25
+        Height = 26
         Top = 32
-        Width = 96
+        Width = 87
         Caption = 'Minimum:'
         ParentColor = False
@@ -188 +183 @@
       object DateEditMax: TDateEdit
         Left = 136
-        Height = 35
+        Height = 36
         Top = 72
         Width = 216
         CalendarDisplaySettings = [dsShowHeadings, dsShowDayNames]
-        OKCaption = 'OK'
-        CancelCaption = 'Cancel'
         DateOrder = doNone
         ButtonWidth = 23
@@ -202 +195 @@
       object Label7: TLabel
         Left = 16
-        Height = 25
+        Height = 26
         Top = 80
-        Width = 100
+        Width = 91
         Caption = 'Maximum:'
         ParentColor = False
@@ -210 +203 @@
     end
     object TabSheetBoolean: TTabSheet
-      Caption = 'TabSheetBoolean'
     end
     object TabSheetFloat: TTabSheet
-      Caption = 'TabSheetFloat'
       ClientHeight = 194
       ClientWidth = 930
       object FloatSpinEditMin: TFloatSpinEdit
         Left = 144
-        Height = 35
+        Height = 36
         Top = 16
         Width = 266
@@ -229 +220 @@
       object Label8: TLabel
         Left = 8
-        Height = 25
+        Height = 26
         Top = 25
-        Width = 96
+        Width = 87
         Caption = 'Minimum:'
         ParentColor = False
@@ -237 +228 @@
       object FloatSpinEditMax: TFloatSpinEdit
         Left = 144
-        Height = 35
+        Height = 36
         Top = 64
         Width = 266
@@ -248 +239 @@
       object Label9: TLabel
         Left = 8
-        Height = 25
+        Height = 26
         Top = 73
-        Width = 100
+        Width = 91
         Caption = 'Maximum:'
         ParentColor = False