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

Comparing ibx/trunk/design/ibupdatesqleditor.lfm (file contents):
Revision 6 by tony, Fri Feb 18 16:26:16 2011 UTC vs.
Revision 7 by tony, Sun Aug 5 18:28:19 2012 UTC

# Line 11 | Line 11 | object IBUpdateSQLEditorForm: TIBUpdateS
11    ClientWidth = 662
12    OnClose = FormClose
13    OnShow = FormShow
14 <  LCLVersion = '0.9.28.2'
14 >  LCLVersion = '0.9.30'
15    object PageControl: TPageControl
16      Left = 7
17      Height = 352
# Line 23 | Line 23 | object IBUpdateSQLEditorForm: TIBUpdateS
23      TabOrder = 0
24      object FieldsPage: TTabSheet
25        Caption = 'Options'
26 <      ClientHeight = 316
26 >      ClientHeight = 317
27        ClientWidth = 635
28        object GroupBox1: TGroupBox
29          Left = 8
30 <        Height = 311
30 >        Height = 312
31          Top = 4
32          Width = 617
33          Anchors = [akTop, akLeft, akRight, akBottom]
34          Caption = ' SQL Generation '
35 <        ClientHeight = 291
35 >        ClientHeight = 293
36          ClientWidth = 613
37          TabOrder = 0
38          object Label1: TLabel
39            Left = 12
40 <          Height = 19
40 >          Height = 18
41            Top = 18
42 <          Width = 103
42 >          Width = 82
43            Caption = 'Table &Name:'
44            FocusControl = TableNamesCombo
45            ParentColor = False
46          end
47          object Label3: TLabel
48 <          Left = 228
49 <          Height = 19
50 <          Top = 19
51 <          Width = 87
48 >          Left = 300
49 >          Height = 18
50 >          Top = 18
51 >          Width = 71
52            Caption = '&Key Fields:'
53            FocusControl = PrimaryKeyList
54            ParentColor = False
55          end
56          object Label4: TLabel
57 <          Left = 371
58 <          Height = 19
59 <          Top = 19
60 <          Width = 113
57 >          Left = 443
58 >          Height = 18
59 >          Top = 18
60 >          Width = 94
61            Caption = 'Update &Fields:'
62            FocusControl = FieldList
63            ParentColor = False
64          end
65          object TableNamesCombo: TComboBox
66            Left = 9
67 <          Height = 30
67 >          Height = 29
68            Top = 35
69            Width = 171
70            ItemHeight = 0
# Line 72 | Line 72 | object IBUpdateSQLEditorForm: TIBUpdateS
72            TabOrder = 0
73          end
74          object PrimaryKeyList: TListBox
75 <          Left = 228
76 <          Height = 230
75 >          Left = 300
76 >          Height = 232
77            Top = 36
78            Width = 136
79            Anchors = [akTop, akLeft, akBottom]
# Line 83 | Line 83 | object IBUpdateSQLEditorForm: TIBUpdateS
83            TopIndex = -1
84          end
85          object FieldList: TListBox
86 <          Left = 371
87 <          Height = 230
88 <          Hint = 'Select Fields to include in Update and Insert Statements, or leave unselected to select all'
86 >          Left = 443
87 >          Height = 232
88 >          Hint = 'Select Fields to include in Update Statements, or leave unselected to select all'
89            Top = 35
90            Width = 136
91            Anchors = [akTop, akLeft, akBottom]
# Line 96 | Line 96 | object IBUpdateSQLEditorForm: TIBUpdateS
96            TabOrder = 4
97            TopIndex = -1
98          end
99 <        object GenerateButton: TButton
99 >        object GenerateBtn: TButton
100            Left = 9
101            Height = 25
102            Top = 83
103            Width = 168
104            Caption = '&Generate SQL'
105 <          OnClick = GenerateButtonClick
105 >          OnClick = GenerateBtnClick
106            TabOrder = 1
107          end
108          object QuoteFields: TCheckBox
109            Left = 9
110            Height = 22
111            Top = 131
112 <          Width = 144
112 >          Width = 132
113            Caption = '&Quote Identifiers'
114            TabOrder = 2
115          end
116 +        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        end
128      end
129      object SQLPage: TTabSheet
130        Caption = 'SQL'
131 <      ClientHeight = 316
131 >      ClientHeight = 317
132        ClientWidth = 635
133        OnShow = SQLPageShow
134        object Label2: TLabel
135          Left = 10
136 <        Height = 19
136 >        Height = 18
137          Top = 81
138 <        Width = 80
138 >        Width = 61
139          Caption = 'S&QL Text:'
140          FocusControl = SQLMemo
141          ParentColor = False
142        end
143        object SQLMemo: TMemo
144          Left = 9
145 <        Height = 204
145 >        Height = 205
146          Top = 105
147          Width = 615
148          Anchors = [akTop, akLeft, akRight, akBottom]
149          OnChange = SQLMemoChange
150 <        ScrollBars = ssVertical
150 >        ScrollBars = ssAutoBoth
151          TabOrder = 0
152        end
153        object StatementType: TRadioGroup
154          Left = 10
155 <        Height = 54
155 >        Height = 53
156          Top = 9
157 <        Width = 303
157 >        Width = 286
158          AutoFill = True
159          AutoSize = True
160          Caption = 'Statement Type'
# Line 156 | Line 167 | object IBUpdateSQLEditorForm: TIBUpdateS
167          ChildSizing.Layout = cclLeftToRightThenTopToBottom
168          ChildSizing.ControlsPerLine = 4
169          ClientHeight = 34
170 <        ClientWidth = 299
170 >        ClientWidth = 282
171          Columns = 4
172          ItemIndex = 0
173          Items.Strings = (
# Line 168 | Line 179 | object IBUpdateSQLEditorForm: TIBUpdateS
179          OnClick = StatementTypeClick
180          TabOrder = 1
181        end
182 <      object Button1: TButton
182 >      object TestBtn: TButton
183          Left = 541
184          Height = 25
185          Top = 31
186          Width = 75
187          Anchors = [akTop, akRight]
188          Caption = 'Test'
189 <        OnClick = Button1Click
189 >        OnClick = TestBtnClick
190          TabOrder = 2
191        end
192      end
# Line 202 | Line 213 | object IBUpdateSQLEditorForm: TIBUpdateS
213      ModalResult = 2
214      TabOrder = 2
215    end
216 +  object IBTransaction1: TIBTransaction
217 +    Active = False
218 +    left = 51
219 +    top = 373
220 +  end
221   end

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines