trunk/design/ibupdatesqleditor.lfm

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