1 |
tony |
5 |
object GeneratorEditor: TGeneratorEditor
|
2 |
tony |
7 |
Left = 334
|
3 |
tony |
5 |
Height = 374
|
4 |
tony |
7 |
Top = 239
|
5 |
tony |
5 |
Width = 478
|
6 |
|
|
ActiveControl = Button1
|
7 |
|
|
Caption = 'Define Generator'
|
8 |
|
|
ClientHeight = 374
|
9 |
|
|
ClientWidth = 478
|
10 |
|
|
OnClose = FormClose
|
11 |
|
|
OnShow = FormShow
|
12 |
tony |
67 |
Position = poScreenCenter
|
13 |
|
|
LCLVersion = '1.8.0.4'
|
14 |
tony |
5 |
object Bevel1: TBevel
|
15 |
|
|
Left = 16
|
16 |
|
|
Height = 336
|
17 |
|
|
Top = 16
|
18 |
|
|
Width = 355
|
19 |
|
|
end
|
20 |
|
|
object Label1: TLabel
|
21 |
|
|
Left = 32
|
22 |
tony |
67 |
Height = 14
|
23 |
tony |
7 |
Top = 40
|
24 |
tony |
67 |
Width = 99
|
25 |
tony |
5 |
Caption = 'Generator Name'
|
26 |
|
|
ParentColor = False
|
27 |
|
|
end
|
28 |
|
|
object Label2: TLabel
|
29 |
|
|
Left = 32
|
30 |
tony |
67 |
Height = 14
|
31 |
tony |
5 |
Top = 192
|
32 |
tony |
67 |
Width = 66
|
33 |
tony |
5 |
Caption = 'Field Name'
|
34 |
|
|
ParentColor = False
|
35 |
|
|
end
|
36 |
|
|
object Label3: TLabel
|
37 |
|
|
Left = 35
|
38 |
tony |
67 |
Height = 14
|
39 |
tony |
5 |
Top = 269
|
40 |
tony |
67 |
Width = 82
|
41 |
tony |
5 |
Caption = 'Increment By'
|
42 |
|
|
ParentColor = False
|
43 |
|
|
end
|
44 |
|
|
object Button1: TButton
|
45 |
|
|
Left = 392
|
46 |
|
|
Height = 30
|
47 |
|
|
Top = 24
|
48 |
|
|
Width = 75
|
49 |
|
|
Caption = 'OK'
|
50 |
|
|
Default = True
|
51 |
|
|
ModalResult = 1
|
52 |
|
|
TabOrder = 0
|
53 |
|
|
end
|
54 |
|
|
object Button2: TButton
|
55 |
|
|
Left = 392
|
56 |
|
|
Height = 30
|
57 |
|
|
Top = 64
|
58 |
|
|
Width = 75
|
59 |
|
|
Cancel = True
|
60 |
|
|
Caption = 'Cancel'
|
61 |
|
|
ModalResult = 2
|
62 |
|
|
TabOrder = 1
|
63 |
|
|
end
|
64 |
|
|
object GeneratorNames: TComboBox
|
65 |
|
|
Left = 32
|
66 |
tony |
67 |
Height = 27
|
67 |
tony |
5 |
Top = 58
|
68 |
|
|
Width = 312
|
69 |
|
|
ItemHeight = 0
|
70 |
|
|
TabOrder = 2
|
71 |
|
|
end
|
72 |
|
|
object OnNewRecord: TRadioButton
|
73 |
|
|
Left = 38
|
74 |
|
|
Height = 22
|
75 |
|
|
Top = 112
|
76 |
tony |
67 |
Width = 116
|
77 |
tony |
5 |
Caption = 'On New Record'
|
78 |
|
|
Checked = True
|
79 |
|
|
TabOrder = 3
|
80 |
tony |
7 |
TabStop = True
|
81 |
tony |
5 |
end
|
82 |
|
|
object OnPost: TRadioButton
|
83 |
|
|
Left = 38
|
84 |
|
|
Height = 22
|
85 |
|
|
Top = 144
|
86 |
tony |
67 |
Width = 70
|
87 |
tony |
5 |
Caption = 'On Post'
|
88 |
|
|
TabOrder = 4
|
89 |
|
|
end
|
90 |
|
|
object FieldNames: TComboBox
|
91 |
|
|
Left = 32
|
92 |
tony |
67 |
Height = 27
|
93 |
tony |
5 |
Top = 213
|
94 |
|
|
Width = 308
|
95 |
|
|
ItemHeight = 0
|
96 |
|
|
Sorted = True
|
97 |
|
|
TabOrder = 5
|
98 |
|
|
end
|
99 |
|
|
object IncrementBy: TEdit
|
100 |
|
|
Left = 39
|
101 |
tony |
67 |
Height = 24
|
102 |
tony |
5 |
Top = 292
|
103 |
|
|
Width = 52
|
104 |
|
|
TabOrder = 6
|
105 |
|
|
Text = 'IncrementBy'
|
106 |
|
|
end
|
107 |
|
|
object UpDown1: TUpDown
|
108 |
|
|
Left = 91
|
109 |
tony |
67 |
Height = 24
|
110 |
tony |
5 |
Top = 292
|
111 |
|
|
Width = 17
|
112 |
|
|
Associate = IncrementBy
|
113 |
|
|
Min = 0
|
114 |
|
|
Position = 0
|
115 |
|
|
TabOrder = 7
|
116 |
|
|
Wrap = False
|
117 |
|
|
end
|
118 |
tony |
7 |
object IBTransaction1: TIBTransaction
|
119 |
|
|
Active = False
|
120 |
|
|
left = 415
|
121 |
|
|
top = 243
|
122 |
|
|
end
|
123 |
tony |
5 |
end
|