ViewVC Help
View File | Revision Log | Show Annotations | Download File | View Changeset | Root Listing
root/public/ibx/trunk/design/ibmodifysqleditor.lfm
Revision: 67
Committed: Tue Oct 3 14:08:11 2017 UTC (6 years, 6 months ago) by tony
File size: 5581 byte(s)
Log Message:
Property Editor positioning tidy up

File Contents

# User Rev Content
1 tony 5 object IBModifySQLEditorForm: TIBModifySQLEditorForm
2 tony 7 Left = 508
3 tony 5 Height = 438
4 tony 7 Top = 250
5 tony 5 Width = 749
6     Caption = 'Modify SQL Editor'
7     ClientHeight = 438
8     ClientWidth = 749
9     OnShow = FormShow
10 tony 67 Position = poScreenCenter
11     LCLVersion = '1.8.0.4'
12 tony 5 object Label3: TLabel
13     Left = 279
14 tony 67 Height = 14
15 tony 5 Top = 16
16 tony 19 Width = 24
17 tony 5 Caption = 'SQL'
18     ParentColor = False
19     end
20     object SQLText: TMemo
21     Left = 279
22     Height = 328
23     Top = 36
24     Width = 439
25 tony 7 Anchors = [akTop, akLeft, akRight, akBottom]
26     ScrollBars = ssAutoBoth
27 tony 5 TabOrder = 0
28     end
29     object Button1: TButton
30     Left = 552
31     Height = 30
32 tony 7 Top = 379
33 tony 5 Width = 72
34 tony 7 Anchors = [akRight, akBottom]
35 tony 5 Caption = 'OK'
36     Default = True
37     ModalResult = 1
38     TabOrder = 1
39     end
40     object Button2: TButton
41     Left = 640
42     Height = 30
43     Top = 380
44     Width = 72
45 tony 7 Anchors = [akRight, akBottom]
46 tony 5 Cancel = True
47     Caption = 'Cancel'
48     ModalResult = 2
49     TabOrder = 2
50     end
51 tony 7 object GenerateBtn: TButton
52 tony 5 Left = 280
53     Height = 30
54     Top = 380
55 tony 7 Width = 101
56     Anchors = [akRight, akBottom]
57 tony 5 Caption = 'Generate SQL'
58 tony 7 OnClick = GenerateBtnClick
59 tony 21 TabOrder = 3
60 tony 5 end
61 tony 7 object TestBtn: TButton
62 tony 5 Left = 416
63     Height = 30
64     Top = 380
65     Width = 66
66 tony 7 Anchors = [akRight, akBottom]
67 tony 5 Caption = 'Test'
68 tony 7 OnClick = TestBtnClick
69 tony 21 TabOrder = 4
70 tony 5 end
71     object QuoteFields: TCheckBox
72     Left = 16
73 tony 21 Height = 22
74 tony 19 Top = 400
75 tony 21 Width = 125
76 tony 5 Caption = '&Quote Identifiers'
77 tony 21 TabOrder = 5
78 tony 5 end
79 tony 19 object GenerateParams: TCheckBox
80     Left = 16
81 tony 21 Height = 22
82 tony 19 Top = 376
83 tony 21 Width = 171
84 tony 19 Caption = 'Allow DSQL Placeholders'
85 tony 21 TabOrder = 6
86 tony 19 end
87 tony 21 object PageControl: TPageControl
88     Left = 18
89     Height = 346
90     Top = 18
91     Width = 238
92     ActivePage = ExecutePage
93     TabIndex = 1
94     TabOrder = 7
95     object ModifyPage: TTabSheet
96     Caption = 'Update'
97 tony 67 ClientHeight = 314
98 tony 21 ClientWidth = 232
99     OnShow = ModifyPageShow
100     object Label1: TLabel
101     Left = 8
102     Height = 15
103     Top = 8
104     Width = 69
105     Caption = 'Table Name'
106     ParentColor = False
107     end
108     object TableNamesCombo: TComboBox
109     Left = 8
110     Height = 27
111     Top = 22
112     Width = 201
113     AutoComplete = True
114     AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
115     ItemHeight = 0
116     OnCloseUp = TableNamesComboCloseUp
117     TabOrder = 0
118     end
119     object Label2: TLabel
120     Left = 8
121     Height = 15
122     Top = 56
123     Width = 33
124     Caption = 'Fields'
125     ParentColor = False
126     end
127     object FieldList: TListBox
128     Left = 8
129     Height = 120
130     Hint = 'Select Fields to include in Update Statement, or leave unselected to select all'
131     Top = 72
132     Width = 200
133     ItemHeight = 0
134     MultiSelect = True
135     OnDblClick = FieldListDblClick
136     ParentShowHint = False
137     ScrollWidth = 198
138     ShowHint = True
139     TabOrder = 1
140     TopIndex = -1
141     end
142     object IncludePrimaryKeys: TCheckBox
143     Left = 8
144     Height = 22
145     Top = 200
146     Width = 221
147     Caption = 'Include Primary keys in Field List'
148     Checked = True
149     OnClick = TableNamesComboCloseUp
150     State = cbChecked
151     TabOrder = 2
152     end
153     object Label4: TLabel
154     Left = 8
155     Height = 15
156     Top = 229
157     Width = 77
158     Caption = 'Primary Keys'
159     ParentColor = False
160     end
161     object PrimaryKeyList: TListBox
162     Left = 8
163     Height = 59
164     Top = 248
165     Width = 200
166     ItemHeight = 0
167     OnDblClick = PrimaryKeyListDblClick
168     ScrollWidth = 198
169     TabOrder = 3
170     TopIndex = -1
171     end
172     end
173     object ExecutePage: TTabSheet
174     Caption = 'Execute'
175 tony 67 ClientHeight = 314
176 tony 21 ClientWidth = 232
177     OnShow = ExecutePageShow
178     object Label16: TLabel
179     Left = 7
180 tony 67 Height = 14
181 tony 21 Top = 8
182     Width = 100
183     Caption = 'Procedure Name'
184     ParentColor = False
185     end
186     object ProcedureNames: TComboBox
187     Left = 7
188     Height = 27
189     Top = 24
190     Width = 201
191     ItemHeight = 0
192     OnCloseUp = ProcedureNamesCloseUp
193     ParentColor = True
194     TabOrder = 0
195     end
196     object Label17: TLabel
197     Left = 7
198 tony 67 Height = 14
199 tony 21 Top = 56
200     Width = 104
201     Caption = 'Input Parameters'
202     ParentColor = False
203     end
204     object ProcInputList: TListBox
205     Left = 8
206     Height = 103
207     Top = 72
208     Width = 198
209     IntegralHeight = True
210     ItemHeight = 0
211     ScrollWidth = 196
212     TabOrder = 1
213     TopIndex = -1
214     end
215     object ProcOutputList: TListBox
216     Left = 7
217     Height = 80
218     Top = 200
219     Width = 198
220     IntegralHeight = True
221     ItemHeight = 0
222     ScrollWidth = 196
223     TabOrder = 2
224     TopIndex = -1
225     end
226     object Label18: TLabel
227     Left = 7
228 tony 67 Height = 14
229 tony 21 Top = 184
230     Width = 114
231     Caption = 'Output Parameters'
232     ParentColor = False
233     end
234     object ExecuteOnlyIndicator: TLabel
235     Left = 10
236 tony 67 Height = 14
237 tony 21 Top = 293
238     Width = 89
239     Caption = 'Execute Only'
240     Font.Style = [fsBold]
241     ParentColor = False
242     ParentFont = False
243     Visible = False
244     end
245     end
246     end
247 tony 7 object IBTransaction1: TIBTransaction
248     Active = False
249     left = 209
250     top = 388
251     end
252 tony 5 end