ViewVC Help
View File | Revision Log | Show Annotations | Download File | View Changeset | Root Listing
root/public/ibx/trunk/design/ibdataseteditor.lfm
Revision: 7
Committed: Sun Aug 5 18:28:19 2012 UTC (11 years, 7 months ago) by tony
File size: 5553 byte(s)
Log Message:
Committing updates for Release R1-0-0

File Contents

# Content
1 object IBDataSetEditorForm: TIBDataSetEditorForm
2 Left = 475
3 Height = 410
4 Top = 327
5 Width = 662
6 ActiveControl = PageControl
7 BorderIcons = [biSystemMenu]
8 BorderStyle = bsDialog
9 Caption = 'DataSet Editor'
10 ClientHeight = 410
11 ClientWidth = 662
12 OnClose = FormClose
13 OnShow = FormShow
14 LCLVersion = '0.9.30'
15 object PageControl: TPageControl
16 Left = 8
17 Height = 352
18 Top = 8
19 Width = 641
20 ActivePage = SQLPage
21 Anchors = [akTop, akLeft, akRight, akBottom]
22 TabIndex = 1
23 TabOrder = 0
24 object FieldsPage: TTabSheet
25 Caption = 'Options'
26 ClientHeight = 317
27 ClientWidth = 635
28 object GroupBox1: TGroupBox
29 Left = 8
30 Height = 312
31 Top = 4
32 Width = 617
33 Anchors = [akTop, akLeft, akRight, akBottom]
34 Caption = ' SQL Generation '
35 ClientHeight = 293
36 ClientWidth = 613
37 TabOrder = 0
38 object Label1: TLabel
39 Left = 12
40 Height = 18
41 Top = 18
42 Width = 82
43 Caption = 'Table &Name:'
44 FocusControl = TableNamesCombo
45 ParentColor = False
46 end
47 object Label3: TLabel
48 Left = 315
49 Height = 18
50 Top = 18
51 Width = 71
52 Caption = '&Key Fields:'
53 FocusControl = PrimaryKeyList
54 ParentColor = False
55 end
56 object Label4: TLabel
57 Left = 458
58 Height = 18
59 Top = 18
60 Width = 94
61 Caption = 'Update &Fields:'
62 FocusControl = FieldList
63 ParentColor = False
64 end
65 object TableNamesCombo: TComboBox
66 Left = 9
67 Height = 29
68 Top = 35
69 Width = 171
70 ItemHeight = 0
71 OnCloseUp = TableNamesComboCloseUp
72 TabOrder = 0
73 end
74 object PrimaryKeyList: TListBox
75 Left = 315
76 Height = 232
77 Top = 35
78 Width = 136
79 Anchors = [akTop, akLeft, akBottom]
80 ItemHeight = 0
81 MultiSelect = True
82 TabOrder = 3
83 TopIndex = -1
84 end
85 object FieldList: TListBox
86 Left = 458
87 Height = 232
88 Hint = 'Select Fields to include in Update Statements, or leave unselected to select all'
89 Top = 35
90 Width = 136
91 Anchors = [akTop, akLeft, akBottom]
92 ItemHeight = 0
93 MultiSelect = True
94 ParentShowHint = False
95 ShowHint = True
96 TabOrder = 4
97 TopIndex = -1
98 end
99 object GenerateButton: TButton
100 Left = 9
101 Height = 25
102 Top = 83
103 Width = 168
104 Caption = '&Generate SQL'
105 OnClick = GenerateButtonClick
106 TabOrder = 1
107 end
108 object QuoteFields: TCheckBox
109 Left = 9
110 Height = 22
111 Top = 131
112 Width = 132
113 Caption = '&Quote Identifiers'
114 TabOrder = 2
115 end
116 object IncludePrimaryKeys: TCheckBox
117 Left = 12
118 Height = 22
119 Top = 163
120 Width = 239
121 Caption = 'Include Primary keys in Field List'
122 Checked = True
123 OnClick = TableNamesComboCloseUp
124 State = cbChecked
125 TabOrder = 5
126 end
127 end
128 end
129 object SQLPage: TTabSheet
130 Caption = 'SQL'
131 ClientHeight = 317
132 ClientWidth = 635
133 OnShow = SQLPageShow
134 object Label2: TLabel
135 Left = 10
136 Height = 18
137 Top = 81
138 Width = 61
139 Caption = 'S&QL Text:'
140 FocusControl = SQLMemo
141 ParentColor = False
142 end
143 object SQLMemo: TMemo
144 Left = 9
145 Height = 205
146 Top = 105
147 Width = 615
148 Anchors = [akTop, akLeft, akRight, akBottom]
149 OnChange = SQLMemoChange
150 ScrollBars = ssAutoBoth
151 TabOrder = 0
152 end
153 object StatementType: TRadioGroup
154 Left = 10
155 Height = 53
156 Top = 9
157 Width = 350
158 AutoFill = True
159 AutoSize = True
160 Caption = 'Statement Type'
161 ChildSizing.LeftRightSpacing = 6
162 ChildSizing.TopBottomSpacing = 6
163 ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
164 ChildSizing.EnlargeVertical = crsHomogenousChildResize
165 ChildSizing.ShrinkHorizontal = crsScaleChilds
166 ChildSizing.ShrinkVertical = crsScaleChilds
167 ChildSizing.Layout = cclLeftToRightThenTopToBottom
168 ChildSizing.ControlsPerLine = 5
169 ClientHeight = 34
170 ClientWidth = 346
171 Columns = 5
172 ItemIndex = 0
173 Items.Strings = (
174 '&Select'
175 '&Modify'
176 '&Insert'
177 '&Delete'
178 '&Refresh'
179 )
180 OnClick = StatementTypeClick
181 TabOrder = 1
182 end
183 object TestBtn: TButton
184 Left = 541
185 Height = 25
186 Top = 31
187 Width = 75
188 Anchors = [akTop, akRight]
189 Caption = 'Test'
190 OnClick = TestBtnClick
191 TabOrder = 2
192 end
193 end
194 end
195 object OkButton: TButton
196 Left = 480
197 Height = 25
198 Top = 376
199 Width = 75
200 Anchors = [akRight, akBottom]
201 Caption = '&OK'
202 Default = True
203 ModalResult = 1
204 TabOrder = 1
205 end
206 object CancelButton: TButton
207 Left = 573
208 Height = 25
209 Top = 376
210 Width = 75
211 Anchors = [akRight, akBottom]
212 Cancel = True
213 Caption = 'Cancel'
214 ModalResult = 2
215 TabOrder = 2
216 end
217 object IBTransaction1: TIBTransaction
218 Active = False
219 left = 32
220 top = 368
221 end
222 end