ViewVC Help
View File | Revision Log | Show Annotations | Download File | View Changeset | Root Listing
root/public/ibx/trunk/design/ibdataseteditor.lfm
(Generate patch)

Comparing ibx/trunk/design/ibdataseteditor.lfm (file contents):
Revision 5 by tony, Fri Feb 18 16:26:16 2011 UTC vs.
Revision 67 by tony, Tue Oct 3 14:08:11 2017 UTC

# Line 1 | Line 1
1   object IBDataSetEditorForm: TIBDataSetEditorForm
2 <  Left = 350
2 >  Left = 475
3    Height = 410
4 <  Top = 324
4 >  Top = 327
5    Width = 662
6    ActiveControl = PageControl
7    BorderIcons = [biSystemMenu]
# Line 11 | Line 11 | object IBDataSetEditorForm: TIBDataSetEd
11    ClientWidth = 662
12    OnClose = FormClose
13    OnShow = FormShow
14 <  LCLVersion = '0.9.28.2'
14 >  Position = poScreenCenter
15 >  LCLVersion = '1.8.0.4'
16    object PageControl: TPageControl
17      Left = 8
18      Height = 352
19      Top = 8
20      Width = 641
21 <    ActivePage = SQLPage
21 >    ActivePage = FieldsPage
22      Anchors = [akTop, akLeft, akRight, akBottom]
23 <    TabIndex = 1
23 >    TabIndex = 0
24      TabOrder = 0
25      object FieldsPage: TTabSheet
26        Caption = 'Options'
27 <      ClientHeight = 316
27 >      ClientHeight = 320
28        ClientWidth = 635
29        object GroupBox1: TGroupBox
30          Left = 8
31 <        Height = 311
31 >        Height = 315
32          Top = 4
33          Width = 617
34          Anchors = [akTop, akLeft, akRight, akBottom]
35          Caption = ' SQL Generation '
36 <        ClientHeight = 291
37 <        ClientWidth = 613
36 >        ClientHeight = 300
37 >        ClientWidth = 615
38          TabOrder = 0
39          object Label1: TLabel
40            Left = 12
41 <          Height = 19
41 >          Height = 14
42            Top = 18
43 <          Width = 103
43 >          Width = 73
44            Caption = 'Table &Name:'
45            FocusControl = TableNamesCombo
46            ParentColor = False
47          end
48          object Label3: TLabel
49 <          Left = 228
50 <          Height = 19
51 <          Top = 19
52 <          Width = 87
49 >          Left = 315
50 >          Height = 14
51 >          Top = 18
52 >          Width = 62
53            Caption = '&Key Fields:'
54            FocusControl = PrimaryKeyList
55            ParentColor = False
56          end
57          object Label4: TLabel
58 <          Left = 371
59 <          Height = 19
60 <          Top = 19
61 <          Width = 113
58 >          Left = 458
59 >          Height = 14
60 >          Top = 18
61 >          Width = 85
62            Caption = 'Update &Fields:'
63            FocusControl = FieldList
64            ParentColor = False
65          end
66          object TableNamesCombo: TComboBox
67            Left = 9
68 <          Height = 30
68 >          Height = 27
69            Top = 35
70            Width = 171
71 +          AutoComplete = True
72 +          AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
73            ItemHeight = 0
74            OnCloseUp = TableNamesComboCloseUp
75            TabOrder = 0
76          end
77          object PrimaryKeyList: TListBox
78 <          Left = 228
79 <          Height = 230
80 <          Top = 36
78 >          Left = 315
79 >          Height = 239
80 >          Top = 35
81            Width = 136
82            Anchors = [akTop, akLeft, akBottom]
83            ItemHeight = 0
84            MultiSelect = True
85 +          ScrollWidth = 134
86            TabOrder = 3
87            TopIndex = -1
88          end
89          object FieldList: TListBox
90 <          Left = 371
91 <          Height = 230
92 <          Hint = 'Select Fields to include in Update and Insert Statements, or leave unselected to select all'
93 <          Top = 36
90 >          Left = 458
91 >          Height = 239
92 >          Hint = 'Select Fields to include in Update Statements, or leave unselected to select all'
93 >          Top = 35
94            Width = 136
95            Anchors = [akTop, akLeft, akBottom]
96            ItemHeight = 0
97            MultiSelect = True
98            ParentShowHint = False
99 +          ScrollWidth = 134
100            ShowHint = True
101            TabOrder = 4
102            TopIndex = -1
# Line 108 | Line 113 | object IBDataSetEditorForm: TIBDataSetEd
113          object QuoteFields: TCheckBox
114            Left = 9
115            Height = 22
116 <          Top = 131
117 <          Width = 144
116 >          Top = 160
117 >          Width = 125
118            Caption = '&Quote Identifiers'
119            TabOrder = 2
120          end
121 +        object IncludePrimaryKeys: TCheckBox
122 +          Left = 9
123 +          Height = 22
124 +          Top = 192
125 +          Width = 221
126 +          Caption = 'Include Primary keys in Field List'
127 +          Checked = True
128 +          OnClick = TableNamesComboCloseUp
129 +          State = cbChecked
130 +          TabOrder = 5
131 +        end
132 +        object GenerateParams: TCheckBox
133 +          Left = 9
134 +          Height = 22
135 +          Top = 128
136 +          Width = 171
137 +          Caption = 'Allow DSQL Placeholders'
138 +          TabOrder = 6
139 +        end
140        end
141      end
142      object SQLPage: TTabSheet
143        Caption = 'SQL'
144 <      ClientHeight = 316
144 >      ClientHeight = 320
145        ClientWidth = 635
146        OnShow = SQLPageShow
147        object Label2: TLabel
148          Left = 10
149 <        Height = 19
149 >        Height = 15
150          Top = 81
151 <        Width = 80
151 >        Width = 56
152          Caption = 'S&QL Text:'
153          FocusControl = SQLMemo
154          ParentColor = False
155        end
156        object SQLMemo: TMemo
157          Left = 9
158 <        Height = 204
158 >        Height = 203
159          Top = 105
160 <        Width = 615
160 >        Width = 613
161          Anchors = [akTop, akLeft, akRight, akBottom]
162          OnChange = SQLMemoChange
163 <        ScrollBars = ssVertical
163 >        ScrollBars = ssAutoBoth
164          TabOrder = 0
165        end
166        object StatementType: TRadioGroup
167          Left = 10
168 <        Height = 54
168 >        Height = 53
169          Top = 9
170 <        Width = 372
170 >        Width = 339
171          AutoFill = True
172          AutoSize = True
173          Caption = 'Statement Type'
# Line 155 | Line 179 | object IBDataSetEditorForm: TIBDataSetEd
179          ChildSizing.ShrinkVertical = crsScaleChilds
180          ChildSizing.Layout = cclLeftToRightThenTopToBottom
181          ChildSizing.ControlsPerLine = 5
182 <        ClientHeight = 34
183 <        ClientWidth = 368
182 >        ClientHeight = 38
183 >        ClientWidth = 337
184          Columns = 5
185          ItemIndex = 0
186          Items.Strings = (
# Line 169 | Line 193 | object IBDataSetEditorForm: TIBDataSetEd
193          OnClick = StatementTypeClick
194          TabOrder = 1
195        end
196 <      object Button1: TButton
197 <        Left = 541
196 >      object TestBtn: TButton
197 >        Left = 539
198          Height = 25
199          Top = 31
200          Width = 75
201          Anchors = [akTop, akRight]
202          Caption = 'Test'
203 <        OnClick = Button1Click
203 >        OnClick = TestBtnClick
204          TabOrder = 2
205        end
206      end
# Line 203 | Line 227 | object IBDataSetEditorForm: TIBDataSetEd
227      ModalResult = 2
228      TabOrder = 2
229    end
230 +  object IBTransaction1: TIBTransaction
231 +    Active = False
232 +    left = 32
233 +    top = 368
234 +  end
235   end

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines