--- ibx/trunk/design/ibinsertsqleditor.lfm	2018/01/18 14:37:32	105
+++ ibx/trunk/design/ibinsertsqleditor.lfm	2018/01/18 14:37:35	106
@@ -1,41 +1,62 @@
 inherited IBInsertSQLEditorForm: TIBInsertSQLEditorForm
   Left = 399
+  Height = 534
   Top = 367
   Caption = 'Insert SQL Editor'
+  ClientHeight = 534
+  inherited Button1: TButton
+    Top = 476
+  end
+  inherited Button2: TButton
+    Top = 476
+  end
   inherited GenerateBtn: TButton
+    Top = 476
     OnClick = GenerateBtnClick
   end
+  inherited TestBtn: TButton
+    Top = 476
+  end
+  inherited QuoteFields: TCheckBox
+    Top = 488
+  end
   inherited PageControl: TPageControl
+    Height = 456
     inherited SelectPage: TTabSheet
+      ClientHeight = 424
+      inherited Label2: TLabel
+        Top = 304
+        Width = 125
+        Caption = 'Updateable Columns'
+      end
       inherited Label4: TLabel
-        Left = 8
-        Top = 296
-        Width = 103
-        Caption = 'Identity Columns'
+        Left = 7
+        Top = 72
       end
       inherited FieldNamesGrid: TIBDynamicGrid
-        Height = 112
+        Height = 80
+        Top = 320
       end
       inherited PrimaryKeysGrid: TIBDynamicGrid
-        Left = 8
-        Top = 312
+        Left = 7
+        Top = 88
         DataSource = IBSQLEditFrame.IdentityColsSource
       end
       inherited SelectSelectAll: TCheckBox
-        Top = 200
+        Top = 400
       end
-      object Label5: TLabel[8]
+      object Label6: TLabel[8]
         Left = 7
         Height = 14
-        Top = 226
-        Width = 138
-        Caption = 'Computed By Columns'
+        Top = 152
+        Width = 103
+        Caption = '&Identity Columns'
         ParentColor = False
       end
-      object ReadOnlyGrid: TIBDynamicGrid[9]
+      object IdentityGrid: TIBDynamicGrid[9]
         Left = 8
-        Height = 48
-        Top = 241
+        Height = 56
+        Top = 168
         Width = 209
         Color = clWindow
         Columns = <        
@@ -60,6 +81,7 @@ inherited IBInsertSQLEditorForm: TIBInse
             DBLookupProperties.ItemWidth = 0
             DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
           end>
+        DataSource = IBSQLEditFrame.IdentityColsSource
         FixedCols = 0
         Options = [dgEditing, dgColumnResize, dgColumnMove, dgRowLines, dgConfirmDelete, dgCancelOnExit, dgDisableDelete, dgDisableInsert]
         Scrollbars = ssAutoVertical
@@ -69,8 +91,54 @@ inherited IBInsertSQLEditorForm: TIBInse
         EditorBorderStyle = bsSingle
         DefaultPositionAtEnd = False
       end
+      object Label5: TLabel[10]
+        Left = 8
+        Height = 14
+        Top = 232
+        Width = 138
+        Caption = '&Computed By Columns'
+        ParentColor = False
+      end
+      object ReadOnlyGrid: TIBDynamicGrid[11]
+        Left = 8
+        Height = 48
+        Top = 248
+        Width = 208
+        Color = clWindow
+        Columns = <        
+          item
+            ButtonStyle = cbsCheckboxColumn
+            Title.Caption = 'SELECTED'
+            Width = 30
+            FieldName = 'SELECTED'
+            AutoSizeColumn = False
+            InitialSortColumn = False
+            DBLookupProperties.ItemHeight = 0
+            DBLookupProperties.ItemWidth = 0
+            DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
+          end        
+          item
+            Title.Caption = 'COLUMNNAME'
+            Width = 64
+            FieldName = 'COLUMNNAME'
+            AutoSizeColumn = True
+            InitialSortColumn = False
+            DBLookupProperties.ItemHeight = 0
+            DBLookupProperties.ItemWidth = 0
+            DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
+          end>
+        FixedCols = 0
+        Options = [dgEditing, dgColumnResize, dgColumnMove, dgRowLines, dgConfirmDelete, dgCancelOnExit, dgDisableDelete, dgDisableInsert]
+        Scrollbars = ssAutoVertical
+        TabOrder = 6
+        ExpandEditorPanelBelowRow = False
+        Descending = False
+        EditorBorderStyle = bsSingle
+        DefaultPositionAtEnd = False
+      end
     end
     inherited ExecutePage: TTabSheet
+      ClientHeight = 424
       inherited Label18: TLabel
         Visible = False
       end
@@ -85,19 +153,22 @@ inherited IBInsertSQLEditorForm: TIBInse
       end
     end
   end
+  inherited GenerateParams: TCheckBox
+    Top = 464
+  end
   inherited IBSQLEditFrame1: TIBSQLEditFrame
     Left = 282
-    Height = 339
+    Height = 442
     Top = 24
     Width = 448
     Anchors = [akTop, akLeft, akRight, akBottom]
-    ClientHeight = 339
+    ClientHeight = 442
     ClientWidth = 448
     TabOrder = 7
     DesignLeft = 1974
     DesignTop = 200
     inherited SQLText: TSynEdit
-      Height = 313
+      Height = 416
       Width = 448
     end
     inherited ToolBar1: TToolBar