trunk/design/ibdataseteditor.lfm

object IBDataSetEditorForm: TIBDataSetEditorForm
  Left = 475
  Height = 410
  Top = 327
  Width = 662
  ActiveControl = PageControl
  BorderIcons = [biSystemMenu]
  BorderStyle = bsDialog
  Caption = 'DataSet Editor'
  ClientHeight = 410
  ClientWidth = 662
  OnClose = FormClose
  OnShow = FormShow
  LCLVersion = '1.2.2.0'
  object PageControl: TPageControl
    Left = 8
    Height = 352
    Top = 8
    Width = 641
    ActivePage = SQLPage
    Anchors = [akTop, akLeft, akRight, akBottom]
    TabIndex = 1
    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 = 12
          Height = 15
          Top = 18
          Width = 73
          Caption = 'Table &Name:'
          FocusControl = TableNamesCombo
          ParentColor = False
        end
        object Label3: TLabel
          Left = 315
          Height = 15
          Top = 18
          Width = 62
          Caption = '&Key Fields:'
          FocusControl = PrimaryKeyList
          ParentColor = False
        end
        object Label4: TLabel
          Left = 458
          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 = 315
          Height = 232
          Top = 35
          Width = 136
          Anchors = [akTop, akLeft, akBottom]
          ItemHeight = 0
          MultiSelect = True
          ScrollWidth = 134
          TabOrder = 3
          TopIndex = -1
        end
        object FieldList: TListBox
          Left = 458
          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 GenerateButton: TButton
          Left = 9
          Height = 25
          Top = 83
          Width = 168
          Caption = '&Generate SQL'
          OnClick = GenerateButtonClick
          TabOrder = 1
        end
        object QuoteFields: TCheckBox
          Left = 9
          Height = 24
          Top = 160
          Width = 127
          Caption = '&Quote Identifiers'
          TabOrder = 2
        end
        object IncludePrimaryKeys: TCheckBox
          Left = 9
          Height = 24
          Top = 192
          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 = 128
          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 = 339
        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 = 5
        ClientHeight = 36
        ClientWidth = 335
        Columns = 5
        ItemIndex = 0
        Items.Strings = (
          '&Select'
          '&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 = 32
    top = 368
  end
end
Revision:	19
Committed:	Mon Jul 7 13:00:15 2014 UTC (10 years, 5 months ago) by tony
File size:	5814 byte(s)
Log Message:	Committing updates for Release R1-1-0
#	User	Rev	Content
1	tony	5	object IBDataSetEditorForm: TIBDataSetEditorForm
2	tony	7	Left = 475
3	tony	5	Height = 410
4	tony	7	Top = 327
5	tony	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	tony	19	LCLVersion = '1.2.2.0'
15	tony	5	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	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			Left = 12
40	tony	19	Height = 15
41	tony	5	Top = 18
42	tony	19	Width = 73
43	tony	5	Caption = 'Table &Name:'
44			FocusControl = TableNamesCombo
45			ParentColor = False
46			end
47			object Label3: TLabel
48	tony	7	Left = 315
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 = 458
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 = 315
76			Height = 232
77			Top = 35
78	tony	5	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 = 458
88			Height = 232
89			Hint = 'Select Fields to include in Update Statements, or leave unselected to select all'
90			Top = 35
91	tony	5	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			object GenerateButton: TButton
102			Left = 9
103			Height = 25
104			Top = 83
105			Width = 168
106			Caption = '&Generate SQL'
107			OnClick = GenerateButtonClick
108			TabOrder = 1
109			end
110			object QuoteFields: TCheckBox
111			Left = 9
112	tony	19	Height = 24
113			Top = 160
114			Width = 127
115	tony	5	Caption = '&Quote Identifiers'
116			TabOrder = 2
117			end
118	tony	7	object IncludePrimaryKeys: TCheckBox
119	tony	19	Left = 9
120			Height = 24
121			Top = 192
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 = 128
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 = 339
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 = 5
179	tony	19	ClientHeight = 36
180			ClientWidth = 335
181	tony	5	Columns = 5
182			ItemIndex = 0
183			Items.Strings = (
184			'&Select'
185			'&Modify'
186			'&Insert'
187			'&Delete'
188			'&Refresh'
189			)
190			OnClick = StatementTypeClick
191			TabOrder = 1
192			end
193	tony	7	object TestBtn: TButton
194	tony	19	Left = 539
195	tony	5	Height = 25
196			Top = 31
197			Width = 75
198			Anchors = [akTop, akRight]
199			Caption = 'Test'
200	tony	7	OnClick = TestBtnClick
201	tony	5	TabOrder = 2
202			end
203			end
204			end
205			object OkButton: TButton
206			Left = 480
207			Height = 25
208			Top = 376
209			Width = 75
210			Anchors = [akRight, akBottom]
211			Caption = '&OK'
212			Default = True
213			ModalResult = 1
214			TabOrder = 1
215			end
216			object CancelButton: TButton
217			Left = 573
218			Height = 25
219			Top = 376
220			Width = 75
221			Anchors = [akRight, akBottom]
222			Cancel = True
223			Caption = 'Cancel'
224			ModalResult = 2
225			TabOrder = 2
226			end
227	tony	7	object IBTransaction1: TIBTransaction
228			Active = False
229			left = 32
230			top = 368
231			end
232	tony	5	end