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