source: trunk/Forms/UFormField.lfm

Last change on this file was 28, checked in by chronos, 20 months ago
  • Modified: Do not create all application forms at initialization phase but dynamically.
File size: 4.9 KB
Line 
1object FormField: TFormField
2 Left = 721
3 Height = 533
4 Top = 85
5 Width = 1169
6 Caption = 'Field'
7 ClientHeight = 533
8 ClientWidth = 1169
9 DesignTimePPI = 144
10 OnCreate = FormCreate
11 OnShow = FormShow
12 Position = poMainFormCenter
13 LCLVersion = '2.2.2.0'
14 object EditName: TEdit
15 Left = 202
16 Height = 43
17 Top = 13
18 Width = 317
19 TabOrder = 0
20 end
21 object Label1: TLabel
22 Left = 20
23 Height = 26
24 Top = 25
25 Width = 56
26 Caption = 'Name:'
27 ParentColor = False
28 end
29 object ButtonOk: TButton
30 Left = 1056
31 Height = 30
32 Top = 480
33 Width = 90
34 Anchors = [akRight, akBottom]
35 Caption = 'Ok'
36 ModalResult = 1
37 TabOrder = 1
38 end
39 object EditTextBefore: TEdit
40 Left = 200
41 Height = 43
42 Top = 106
43 Width = 318
44 TabOrder = 2
45 end
46 object Label2: TLabel
47 Left = 19
48 Height = 26
49 Top = 118
50 Width = 100
51 Caption = 'Text before:'
52 ParentColor = False
53 end
54 object EditTextAfter: TEdit
55 Left = 200
56 Height = 43
57 Top = 163
58 Width = 318
59 TabOrder = 3
60 end
61 object Label3: TLabel
62 Left = 19
63 Height = 26
64 Top = 173
65 Width = 84
66 Caption = 'Text after:'
67 ParentColor = False
68 end
69 object Label4: TLabel
70 Left = 20
71 Height = 26
72 Top = 67
73 Width = 85
74 Caption = 'Data type:'
75 ParentColor = False
76 end
77 object ComboBoxType: TComboBox
78 Left = 200
79 Height = 42
80 Top = 58
81 Width = 318
82 ItemHeight = 0
83 OnChange = ComboBoxTypeChange
84 Style = csDropDownList
85 TabOrder = 4
86 end
87 object ButtonCancel: TButton
88 Left = 941
89 Height = 30
90 Top = 480
91 Width = 90
92 Anchors = [akRight, akBottom]
93 Caption = 'Cancel'
94 ModalResult = 2
95 TabOrder = 5
96 end
97 object PageControl1: TPageControl
98 Left = 19
99 Height = 240
100 Top = 221
101 Width = 1124
102 ActivePage = TabSheetBoolean
103 Anchors = [akTop, akLeft, akRight, akBottom]
104 ShowTabs = False
105 TabIndex = 3
106 TabOrder = 6
107 object TabSheetString: TTabSheet
108 ClientHeight = 236
109 ClientWidth = 1114
110 object EditStringDefault: TEdit
111 Left = 192
112 Height = 43
113 Top = 10
114 Width = 318
115 TabOrder = 0
116 end
117 object Label5: TLabel
118 Left = 19
119 Height = 26
120 Top = 10
121 Width = 116
122 Caption = 'Default value:'
123 ParentColor = False
124 end
125 end
126 object TabSheetInteger: TTabSheet
127 ClientHeight = 236
128 ClientWidth = 1114
129 object Label10: TLabel
130 Left = 14
131 Height = 26
132 Top = 25
133 Width = 87
134 Caption = 'Minimum:'
135 ParentColor = False
136 end
137 object SpinEditMin: TSpinEdit
138 Left = 184
139 Height = 43
140 Top = 23
141 Width = 306
142 MaxValue = 10000000
143 TabOrder = 0
144 end
145 object SpinEditMax: TSpinEdit
146 Left = 184
147 Height = 43
148 Top = 67
149 Width = 306
150 TabOrder = 1
151 end
152 object Label11: TLabel
153 Left = 14
154 Height = 26
155 Top = 70
156 Width = 91
157 Caption = 'Maximum:'
158 ParentColor = False
159 end
160 end
161 object TabSheetDateTime: TTabSheet
162 ClientHeight = 236
163 ClientWidth = 1114
164 object DateEditMin: TDateEdit
165 Left = 163
166 Height = 43
167 Top = 29
168 Width = 259
169 CalendarDisplaySettings = [dsShowHeadings, dsShowDayNames]
170 DateOrder = doNone
171 ButtonWidth = 28
172 NumGlyphs = 1
173 MaxLength = 0
174 TabOrder = 0
175 end
176 object Label6: TLabel
177 Left = 19
178 Height = 26
179 Top = 38
180 Width = 87
181 Caption = 'Minimum:'
182 ParentColor = False
183 end
184 object DateEditMax: TDateEdit
185 Left = 163
186 Height = 43
187 Top = 86
188 Width = 259
189 CalendarDisplaySettings = [dsShowHeadings, dsShowDayNames]
190 DateOrder = doNone
191 ButtonWidth = 28
192 NumGlyphs = 1
193 MaxLength = 0
194 TabOrder = 1
195 end
196 object Label7: TLabel
197 Left = 19
198 Height = 26
199 Top = 96
200 Width = 91
201 Caption = 'Maximum:'
202 ParentColor = False
203 end
204 end
205 object TabSheetBoolean: TTabSheet
206 end
207 object TabSheetFloat: TTabSheet
208 ClientHeight = 236
209 ClientWidth = 1114
210 object FloatSpinEditMin: TFloatSpinEdit
211 Left = 173
212 Height = 43
213 Top = 19
214 Width = 319
215 MaxValue = 100000000
216 TabOrder = 0
217 end
218 object Label8: TLabel
219 Left = 10
220 Height = 26
221 Top = 30
222 Width = 87
223 Caption = 'Minimum:'
224 ParentColor = False
225 end
226 object FloatSpinEditMax: TFloatSpinEdit
227 Left = 173
228 Height = 43
229 Top = 77
230 Width = 319
231 MaxValue = 100
232 TabOrder = 1
233 end
234 object Label9: TLabel
235 Left = 10
236 Height = 26
237 Top = 88
238 Width = 91
239 Caption = 'Maximum:'
240 ParentColor = False
241 end
242 end
243 end
244end
Note: See TracBrowser for help on using the repository browser.