trunk/design/ibselectsqleditor.lfm

object IBSelectSQLEditorForm: TIBSelectSQLEditorForm
  Left = 582
  Height = 437
  Top = 460
  Width = 747
  ActiveControl = PageControl
  Caption = 'Select SQL Editor'
  ClientHeight = 437
  ClientWidth = 747
  OnShow = FormShow
  LCLVersion = '1.2.6.0'
  object Label3: TLabel
    Left = 279
    Height = 15
    Top = 16
    Width = 24
    Caption = 'SQL'
    ParentColor = False
  end
  object SQLText: TMemo
    Left = 279
    Height = 327
    Top = 36
    Width = 437
    Anchors = [akTop, akLeft, akRight, akBottom]
    ScrollBars = ssAutoBoth
    TabOrder = 0
  end
  object Button1: TButton
    Left = 550
    Height = 30
    Top = 379
    Width = 72
    Anchors = [akRight, akBottom]
    Caption = 'OK'
    Default = True
    ModalResult = 1
    TabOrder = 1
  end
  object Button2: TButton
    Left = 638
    Height = 30
    Top = 379
    Width = 72
    Anchors = [akRight, akBottom]
    Cancel = True
    Caption = 'Cancel'
    ModalResult = 2
    TabOrder = 2
  end
  object GenerateBtn: TButton
    Left = 278
    Height = 30
    Top = 379
    Width = 101
    Anchors = [akRight, akBottom]
    Caption = 'Generate SQL'
    OnClick = GenerateBtnClick
    TabOrder = 3
  end
  object TestBtn: TButton
    Left = 414
    Height = 30
    Top = 379
    Width = 66
    Anchors = [akRight, akBottom]
    Caption = 'Test'
    OnClick = TestBtnClick
    TabOrder = 4
  end
  object QuoteFields: TCheckBox
    Left = 24
    Height = 22
    Top = 400
    Width = 125
    Caption = '&Quote Identifiers'
    TabOrder = 5
  end
  object PageControl: TPageControl
    Left = 24
    Height = 335
    Top = 28
    Width = 232
    ActivePage = ExecutePage
    TabIndex = 1
    TabOrder = 6
    object SelectPage: TTabSheet
      Caption = 'Tables'
      ClientHeight = 302
      ClientWidth = 226
      OnShow = SelectPageShow
      object Label1: TLabel
        Left = 7
        Height = 15
        Top = 4
        Width = 69
        Caption = 'Table Name'
        ParentColor = False
      end
      object Label2: TLabel
        Left = 7
        Height = 15
        Top = 72
        Width = 33
        Caption = 'Fields'
        ParentColor = False
      end
      object Label4: TLabel
        Left = 7
        Height = 15
        Top = 244
        Width = 77
        Caption = 'Primary Keys'
        ParentColor = False
      end
      object TableNamesCombo: TComboBox
        Left = 6
        Height = 27
        Top = 20
        Width = 201
        AutoComplete = True
        AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
        ItemHeight = 0
        OnCloseUp = TableNamesComboCloseUp
        TabOrder = 0
      end
      object FieldList: TListBox
        Left = 7
        Height = 138
        Hint = 'Select Fields to include in Select Statements, or leave unselected to select all'
        Top = 92
        Width = 204
        ItemHeight = 0
        MultiSelect = True
        OnDblClick = FieldListDblClick
        ParentShowHint = False
        ScrollWidth = 202
        ShowHint = True
        TabOrder = 1
        TopIndex = -1
      end
      object PrimaryKeyList: TListBox
        Left = 7
        Height = 28
        Top = 260
        Width = 200
        ItemHeight = 0
        OnDblClick = PrimaryKeyListDblClick
        ScrollWidth = 198
        TabOrder = 2
        TopIndex = -1
      end
    end
    object ExecutePage: TTabSheet
      Caption = 'Procedures'
      ClientHeight = 302
      ClientWidth = 226
      OnShow = ExecutePageShow
      object Label16: TLabel
        Left = 7
        Height = 15
        Top = 3
        Width = 100
        Caption = 'Procedure Name'
        ParentColor = False
      end
      object Label17: TLabel
        Left = 7
        Height = 15
        Top = 60
        Width = 104
        Caption = 'Input Parameters'
        ParentColor = False
      end
      object Label18: TLabel
        Left = 8
        Height = 15
        Top = 172
        Width = 114
        Caption = 'Output Parameters'
        ParentColor = False
      end
      object ProcedureNames: TComboBox
        Left = 7
        Height = 27
        Top = 20
        Width = 201
        ItemHeight = 0
        OnCloseUp = ProcedureNamesCloseUp
        ParentColor = True
        TabOrder = 0
      end
      object ProcInputList: TListBox
        Left = 7
        Height = 80
        Top = 81
        Width = 198
        IntegralHeight = True
        ItemHeight = 0
        ScrollWidth = 196
        TabOrder = 1
        TopIndex = -1
      end
      object ProcOutputList: TListBox
        Left = 7
        Height = 80
        Top = 192
        Width = 198
        IntegralHeight = True
        ItemHeight = 0
        ScrollWidth = 196
        TabOrder = 2
        TopIndex = -1
      end
      object SelectProcedure: TLabel
        Left = 7
        Height = 14
        Top = 285
        Width = 126
        Anchors = [akLeft, akBottom]
        Caption = 'Is ''Select Procedure'''
        Font.Height = -11
        Font.Style = [fsBold]
        ParentColor = False
        ParentFont = False
        Visible = False
      end
    end
  end
  object GenerateParams: TCheckBox
    Left = 24
    Height = 22
    Top = 376
    Width = 171
    Caption = 'Allow DSQL Placeholders'
    TabOrder = 7
  end
  object IBTransaction1: TIBTransaction
    Active = False
    left = 212
    top = 390
  end
end
Revision:	21
Committed:	Thu Feb 26 10:33:34 2015 UTC (9 years, 9 months ago) by tony
File size:	5361 byte(s)
Log Message:	Committing updates for Release R1-2-0
#	User	Rev	Content
1	tony	5	object IBSelectSQLEditorForm: TIBSelectSQLEditorForm
2	tony	21	Left = 582
3	tony	7	Height = 437
4	tony	21	Top = 460
5	tony	7	Width = 747
6			ActiveControl = PageControl
7	tony	5	Caption = 'Select SQL Editor'
8	tony	7	ClientHeight = 437
9			ClientWidth = 747
10	tony	5	OnShow = FormShow
11	tony	21	LCLVersion = '1.2.6.0'
12	tony	5	object Label3: TLabel
13			Left = 279
14	tony	19	Height = 15
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	tony	7	Height = 327
23	tony	5	Top = 36
24	tony	7	Width = 437
25			Anchors = [akTop, akLeft, akRight, akBottom]
26			ScrollBars = ssAutoBoth
27	tony	5	TabOrder = 0
28			end
29			object Button1: TButton
30	tony	7	Left = 550
31	tony	5	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	tony	7	Left = 638
42	tony	5	Height = 30
43	tony	7	Top = 379
44	tony	5	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			Left = 278
53	tony	5	Height = 30
54	tony	7	Top = 379
55			Width = 101
56			Anchors = [akRight, akBottom]
57			Caption = 'Generate SQL'
58			OnClick = GenerateBtnClick
59	tony	5	TabOrder = 3
60			end
61	tony	7	object TestBtn: TButton
62			Left = 414
63	tony	5	Height = 30
64	tony	7	Top = 379
65	tony	5	Width = 66
66	tony	7	Anchors = [akRight, akBottom]
67	tony	5	Caption = 'Test'
68	tony	7	OnClick = TestBtnClick
69			TabOrder = 4
70	tony	5	end
71			object QuoteFields: TCheckBox
72	tony	19	Left = 24
73	tony	21	Height = 22
74	tony	19	Top = 400
75	tony	21	Width = 125
76	tony	5	Caption = '&Quote Identifiers'
77	tony	7	TabOrder = 5
78	tony	5	end
79	tony	7	object PageControl: TPageControl
80			Left = 24
81			Height = 335
82			Top = 28
83			Width = 232
84	tony	21	ActivePage = ExecutePage
85			TabIndex = 1
86	tony	7	TabOrder = 6
87			object SelectPage: TTabSheet
88			Caption = 'Tables'
89	tony	21	ClientHeight = 302
90			ClientWidth = 226
91	tony	7	OnShow = SelectPageShow
92			object Label1: TLabel
93			Left = 7
94	tony	19	Height = 15
95	tony	7	Top = 4
96	tony	19	Width = 69
97	tony	7	Caption = 'Table Name'
98			ParentColor = False
99			end
100			object Label2: TLabel
101			Left = 7
102	tony	19	Height = 15
103	tony	7	Top = 72
104	tony	19	Width = 33
105	tony	7	Caption = 'Fields'
106			ParentColor = False
107			end
108			object Label4: TLabel
109			Left = 7
110	tony	19	Height = 15
111	tony	7	Top = 244
112	tony	19	Width = 77
113	tony	7	Caption = 'Primary Keys'
114			ParentColor = False
115			end
116			object TableNamesCombo: TComboBox
117	tony	21	Left = 6
118	tony	19	Height = 27
119	tony	7	Top = 20
120			Width = 201
121	tony	21	AutoComplete = True
122			AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
123	tony	7	ItemHeight = 0
124			OnCloseUp = TableNamesComboCloseUp
125			TabOrder = 0
126			end
127			object FieldList: TListBox
128			Left = 7
129			Height = 138
130			Hint = 'Select Fields to include in Select Statements, or leave unselected to select all'
131			Top = 92
132			Width = 204
133			ItemHeight = 0
134			MultiSelect = True
135			OnDblClick = FieldListDblClick
136			ParentShowHint = False
137	tony	19	ScrollWidth = 202
138	tony	7	ShowHint = True
139			TabOrder = 1
140			TopIndex = -1
141			end
142			object PrimaryKeyList: TListBox
143			Left = 7
144			Height = 28
145			Top = 260
146			Width = 200
147			ItemHeight = 0
148			OnDblClick = PrimaryKeyListDblClick
149	tony	19	ScrollWidth = 198
150	tony	7	TabOrder = 2
151			TopIndex = -1
152			end
153			end
154			object ExecutePage: TTabSheet
155			Caption = 'Procedures'
156	tony	21	ClientHeight = 302
157			ClientWidth = 226
158	tony	7	OnShow = ExecutePageShow
159			object Label16: TLabel
160			Left = 7
161	tony	21	Height = 15
162	tony	7	Top = 3
163	tony	21	Width = 100
164	tony	7	Caption = 'Procedure Name'
165			ParentColor = False
166			end
167			object Label17: TLabel
168			Left = 7
169	tony	21	Height = 15
170	tony	7	Top = 60
171	tony	21	Width = 104
172	tony	7	Caption = 'Input Parameters'
173			ParentColor = False
174			end
175			object Label18: TLabel
176			Left = 8
177	tony	21	Height = 15
178	tony	7	Top = 172
179	tony	21	Width = 114
180	tony	7	Caption = 'Output Parameters'
181			ParentColor = False
182			end
183			object ProcedureNames: TComboBox
184			Left = 7
185	tony	21	Height = 27
186	tony	7	Top = 20
187			Width = 201
188			ItemHeight = 0
189			OnCloseUp = ProcedureNamesCloseUp
190			ParentColor = True
191			TabOrder = 0
192			end
193			object ProcInputList: TListBox
194			Left = 7
195			Height = 80
196			Top = 81
197			Width = 198
198			IntegralHeight = True
199			ItemHeight = 0
200	tony	19	ScrollWidth = 196
201	tony	7	TabOrder = 1
202			TopIndex = -1
203			end
204			object ProcOutputList: TListBox
205			Left = 7
206			Height = 80
207			Top = 192
208			Width = 198
209			IntegralHeight = True
210			ItemHeight = 0
211	tony	19	ScrollWidth = 196
212	tony	7	TabOrder = 2
213			TopIndex = -1
214			end
215			object SelectProcedure: TLabel
216			Left = 7
217	tony	21	Height = 14
218			Top = 285
219			Width = 126
220	tony	7	Anchors = [akLeft, akBottom]
221			Caption = 'Is ''Select Procedure'''
222			Font.Height = -11
223			Font.Style = [fsBold]
224			ParentColor = False
225			ParentFont = False
226			Visible = False
227			end
228			end
229	tony	5	end
230	tony	19	object GenerateParams: TCheckBox
231			Left = 24
232	tony	21	Height = 22
233	tony	19	Top = 376
234	tony	21	Width = 171
235	tony	19	Caption = 'Allow DSQL Placeholders'
236			TabOrder = 7
237			end
238	tony	7	object IBTransaction1: TIBTransaction
239			Active = False
240			left = 212
241			top = 390
242			end
243	tony	5	end