trunk/design/ibupdatesqleditor.lfm

object IBUpdateSQLEditorForm: TIBUpdateSQLEditorForm
  Left = 350
  Height = 410
  Top = 324
  Width = 662
  ActiveControl = PageControl
  BorderIcons = [biSystemMenu]
  BorderStyle = bsDialog
  Caption = 'UpdateSQL Editor'
  ClientHeight = 410
  ClientWidth = 662
  OnClose = FormClose
  OnShow = FormShow
  LCLVersion = '0.9.30'
  object PageControl: TPageControl
    Left = 7
    Height = 352
    Top = 8
    Width = 641
    ActivePage = SQLPage
    Anchors = [akTop, akLeft, akRight, akBottom]
    TabIndex = 1
    TabOrder = 0
    object FieldsPage: TTabSheet
      Caption = 'Options'
      ClientHeight = 317
      ClientWidth = 635
      object GroupBox1: TGroupBox
        Left = 8
        Height = 312
        Top = 4
        Width = 617
        Anchors = [akTop, akLeft, akRight, akBottom]
        Caption = ' SQL Generation '
        ClientHeight = 293
        ClientWidth = 613
        TabOrder = 0
        object Label1: TLabel
          Left = 12
          Height = 18
          Top = 18
          Width = 82
          Caption = 'Table &Name:'
          FocusControl = TableNamesCombo
          ParentColor = False
        end
        object Label3: TLabel
          Left = 300
          Height = 18
          Top = 18
          Width = 71
          Caption = '&Key Fields:'
          FocusControl = PrimaryKeyList
          ParentColor = False
        end
        object Label4: TLabel
          Left = 443
          Height = 18
          Top = 18
          Width = 94
          Caption = 'Update &Fields:'
          FocusControl = FieldList
          ParentColor = False
        end
        object TableNamesCombo: TComboBox
          Left = 9
          Height = 29
          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
          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
          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 = 9
          Height = 22
          Top = 131
          Width = 132
          Caption = '&Quote Identifiers'
          TabOrder = 2
        end
        object IncludePrimaryKeys: TCheckBox
          Left = 9
          Height = 22
          Top = 163
          Width = 239
          Caption = 'Include Primary keys in Field List'
          Checked = True
          OnClick = TableNamesComboCloseUp
          State = cbChecked
          TabOrder = 5
        end
      end
    end
    object SQLPage: TTabSheet
      Caption = 'SQL'
      ClientHeight = 317
      ClientWidth = 635
      OnShow = SQLPageShow
      object Label2: TLabel
        Left = 10
        Height = 18
        Top = 81
        Width = 61
        Caption = 'S&QL Text:'
        FocusControl = SQLMemo
        ParentColor = False
      end
      object SQLMemo: TMemo
        Left = 9
        Height = 205
        Top = 105
        Width = 615
        Anchors = [akTop, akLeft, akRight, akBottom]
        OnChange = SQLMemoChange
        ScrollBars = ssAutoBoth
        TabOrder = 0
      end
      object StatementType: TRadioGroup
        Left = 10
        Height = 53
        Top = 9
        Width = 286
        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 = 34
        ClientWidth = 282
        Columns = 4
        ItemIndex = 0
        Items.Strings = (
          '&Modify'
          '&Insert'
          '&Delete'
          '&Refresh'
        )
        OnClick = StatementTypeClick
        TabOrder = 1
      end
      object TestBtn: TButton
        Left = 541
        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:	7
Committed:	Sun Aug 5 18:28:19 2012 UTC (11 years, 8 months ago) by tony
File size:	5532 byte(s)
Log Message:	Committing updates for Release R1-0-0
#	User	Rev	Content
1	tony	5	object IBUpdateSQLEditorForm: TIBUpdateSQLEditorForm
2			Left = 350
3			Height = 410
4			Top = 324
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	7	LCLVersion = '0.9.30'
15	tony	5	object PageControl: TPageControl
16			Left = 7
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	tony	7	ClientHeight = 317
27	tony	5	ClientWidth = 635
28			object GroupBox1: TGroupBox
29			Left = 8
30	tony	7	Height = 312
31	tony	5	Top = 4
32			Width = 617
33			Anchors = [akTop, akLeft, akRight, akBottom]
34			Caption = ' SQL Generation '
35	tony	7	ClientHeight = 293
36	tony	5	ClientWidth = 613
37			TabOrder = 0
38			object Label1: TLabel
39			Left = 12
40	tony	7	Height = 18
41	tony	5	Top = 18
42	tony	7	Width = 82
43	tony	5	Caption = 'Table &Name:'
44			FocusControl = TableNamesCombo
45			ParentColor = False
46			end
47			object Label3: TLabel
48	tony	7	Left = 300
49			Height = 18
50			Top = 18
51			Width = 71
52	tony	5	Caption = '&Key Fields:'
53			FocusControl = PrimaryKeyList
54			ParentColor = False
55			end
56			object Label4: TLabel
57	tony	7	Left = 443
58			Height = 18
59			Top = 18
60			Width = 94
61	tony	5	Caption = 'Update &Fields:'
62			FocusControl = FieldList
63			ParentColor = False
64			end
65			object TableNamesCombo: TComboBox
66			Left = 9
67	tony	7	Height = 29
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			TabOrder = 3
83			TopIndex = -1
84			end
85			object FieldList: TListBox
86	tony	7	Left = 443
87			Height = 232
88			Hint = 'Select Fields to include in Update Statements, or leave unselected to select all'
89	tony	5	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	tony	7	object GenerateBtn: TButton
100	tony	5	Left = 9
101			Height = 25
102			Top = 83
103			Width = 168
104			Caption = '&Generate SQL'
105	tony	7	OnClick = GenerateBtnClick
106	tony	5	TabOrder = 1
107			end
108			object QuoteFields: TCheckBox
109			Left = 9
110			Height = 22
111			Top = 131
112	tony	7	Width = 132
113	tony	5	Caption = '&Quote Identifiers'
114			TabOrder = 2
115			end
116	tony	7	object IncludePrimaryKeys: TCheckBox
117			Left = 9
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	tony	5	end
128			end
129			object SQLPage: TTabSheet
130			Caption = 'SQL'
131	tony	7	ClientHeight = 317
132	tony	5	ClientWidth = 635
133			OnShow = SQLPageShow
134			object Label2: TLabel
135			Left = 10
136	tony	7	Height = 18
137	tony	5	Top = 81
138	tony	7	Width = 61
139	tony	5	Caption = 'S&QL Text:'
140			FocusControl = SQLMemo
141			ParentColor = False
142			end
143			object SQLMemo: TMemo
144			Left = 9
145	tony	7	Height = 205
146	tony	5	Top = 105
147			Width = 615
148			Anchors = [akTop, akLeft, akRight, akBottom]
149			OnChange = SQLMemoChange
150	tony	7	ScrollBars = ssAutoBoth
151	tony	5	TabOrder = 0
152			end
153			object StatementType: TRadioGroup
154			Left = 10
155	tony	7	Height = 53
156	tony	5	Top = 9
157	tony	7	Width = 286
158	tony	5	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 = 4
169			ClientHeight = 34
170	tony	7	ClientWidth = 282
171	tony	5	Columns = 4
172			ItemIndex = 0
173			Items.Strings = (
174			'&Modify'
175			'&Insert'
176			'&Delete'
177			'&Refresh'
178			)
179			OnClick = StatementTypeClick
180			TabOrder = 1
181			end
182	tony	7	object TestBtn: TButton
183	tony	5	Left = 541
184			Height = 25
185			Top = 31
186			Width = 75
187			Anchors = [akTop, akRight]
188			Caption = 'Test'
189	tony	7	OnClick = TestBtnClick
190	tony	5	TabOrder = 2
191			end
192			end
193			end
194			object OkButton: TButton
195			Left = 480
196			Height = 25
197			Top = 376
198			Width = 75
199			Anchors = [akRight, akBottom]
200			Caption = '&OK'
201			Default = True
202			ModalResult = 1
203			TabOrder = 1
204			end
205			object CancelButton: TButton
206			Left = 573
207			Height = 25
208			Top = 376
209			Width = 75
210			Anchors = [akRight, akBottom]
211			Cancel = True
212			Caption = 'Cancel'
213			ModalResult = 2
214			TabOrder = 2
215			end
216	tony	7	object IBTransaction1: TIBTransaction
217			Active = False
218			left = 51
219			top = 373
220			end
221	tony	5	end