trunk/design/ibselectsqleditor.lfm

object IBSelectSQLEditorForm: TIBSelectSQLEditorForm
  Left = 272
  Height = 437
  Top = 457
  Width = 747
  ActiveControl = PageControl
  Caption = 'Select SQL Editor'
  ClientHeight = 437
  ClientWidth = 747
  OnShow = FormShow
  LCLVersion = '1.2.2.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 = 24
    Top = 400
    Width = 127
    Caption = '&Quote Identifiers'
    TabOrder = 5
  end
  object PageControl: TPageControl
    Left = 24
    Height = 335
    Top = 28
    Width = 232
    ActivePage = SelectPage
    TabIndex = 0
    TabOrder = 6
    object SelectPage: TTabSheet
      Caption = 'Tables'
      ClientHeight = 298
      ClientWidth = 224
      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 = 7
        Height = 27
        Top = 20
        Width = 201
        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 = 298
      ClientWidth = 224
      OnShow = ExecutePageShow
      object Label16: TLabel
        Left = 7
        Height = 18
        Top = 3
        Width = 109
        Caption = 'Procedure Name'
        ParentColor = False
      end
      object Label17: TLabel
        Left = 7
        Height = 18
        Top = 60
        Width = 112
        Caption = 'Input Parameters'
        ParentColor = False
      end
      object Label18: TLabel
        Left = 8
        Height = 18
        Top = 172
        Width = 123
        Caption = 'Output Parameters'
        ParentColor = False
      end
      object ProcedureNames: TComboBox
        Left = 7
        Height = 29
        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 = 15
        Top = 280
        Width = 127
        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 = 24
    Top = 376
    Width = 173
    Caption = 'Allow DSQL Placeholders'
    TabOrder = 7
  end
  object IBTransaction1: TIBTransaction
    Active = False
    left = 212
    top = 390
  end
end
Revision:	19
Committed:	Mon Jul 7 13:00:15 2014 UTC (9 years, 9 months ago) by tony
File size:	5244 byte(s)
Log Message:	Committing updates for Release R1-1-0
#	User	Rev	Content
1	tony	5	object IBSelectSQLEditorForm: TIBSelectSQLEditorForm
2	tony	7	Left = 272
3			Height = 437
4			Top = 457
5			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	19	LCLVersion = '1.2.2.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			Height = 24
74			Top = 400
75			Width = 127
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			ActivePage = SelectPage
85			TabIndex = 0
86			TabOrder = 6
87			object SelectPage: TTabSheet
88			Caption = 'Tables'
89	tony	19	ClientHeight = 298
90			ClientWidth = 224
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			Left = 7
118	tony	19	Height = 27
119	tony	7	Top = 20
120			Width = 201
121			ItemHeight = 0
122			OnCloseUp = TableNamesComboCloseUp
123			TabOrder = 0
124			end
125			object FieldList: TListBox
126			Left = 7
127			Height = 138
128			Hint = 'Select Fields to include in Select Statements, or leave unselected to select all'
129			Top = 92
130			Width = 204
131			ItemHeight = 0
132			MultiSelect = True
133			OnDblClick = FieldListDblClick
134			ParentShowHint = False
135	tony	19	ScrollWidth = 202
136	tony	7	ShowHint = True
137			TabOrder = 1
138			TopIndex = -1
139			end
140			object PrimaryKeyList: TListBox
141			Left = 7
142			Height = 28
143			Top = 260
144			Width = 200
145			ItemHeight = 0
146			OnDblClick = PrimaryKeyListDblClick
147	tony	19	ScrollWidth = 198
148	tony	7	TabOrder = 2
149			TopIndex = -1
150			end
151			end
152			object ExecutePage: TTabSheet
153			Caption = 'Procedures'
154	tony	19	ClientHeight = 298
155			ClientWidth = 224
156	tony	7	OnShow = ExecutePageShow
157			object Label16: TLabel
158			Left = 7
159			Height = 18
160			Top = 3
161			Width = 109
162			Caption = 'Procedure Name'
163			ParentColor = False
164			end
165			object Label17: TLabel
166			Left = 7
167			Height = 18
168			Top = 60
169			Width = 112
170			Caption = 'Input Parameters'
171			ParentColor = False
172			end
173			object Label18: TLabel
174			Left = 8
175			Height = 18
176			Top = 172
177			Width = 123
178			Caption = 'Output Parameters'
179			ParentColor = False
180			end
181			object ProcedureNames: TComboBox
182			Left = 7
183			Height = 29
184			Top = 20
185			Width = 201
186			ItemHeight = 0
187			OnCloseUp = ProcedureNamesCloseUp
188			ParentColor = True
189			TabOrder = 0
190			end
191			object ProcInputList: TListBox
192			Left = 7
193			Height = 80
194			Top = 81
195			Width = 198
196			IntegralHeight = True
197			ItemHeight = 0
198	tony	19	ScrollWidth = 196
199	tony	7	TabOrder = 1
200			TopIndex = -1
201			end
202			object ProcOutputList: TListBox
203			Left = 7
204			Height = 80
205			Top = 192
206			Width = 198
207			IntegralHeight = True
208			ItemHeight = 0
209	tony	19	ScrollWidth = 196
210	tony	7	TabOrder = 2
211			TopIndex = -1
212			end
213			object SelectProcedure: TLabel
214			Left = 7
215			Height = 15
216			Top = 280
217			Width = 127
218			Anchors = [akLeft, akBottom]
219			Caption = 'Is ''Select Procedure'''
220			Font.Height = -11
221			Font.Style = [fsBold]
222			ParentColor = False
223			ParentFont = False
224			Visible = False
225			end
226			end
227	tony	5	end
228	tony	19	object GenerateParams: TCheckBox
229			Left = 24
230			Height = 24
231			Top = 376
232			Width = 173
233			Caption = 'Allow DSQL Placeholders'
234			TabOrder = 7
235			end
236	tony	7	object IBTransaction1: TIBTransaction
237			Active = False
238			left = 212
239			top = 390
240			end
241	tony	5	end