--- ibx/trunk/design/ibselectsqleditor.lfm	2016/01/26 14:38:47	36
+++ ibx/trunk/design/ibselectsqleditor.lfm	2016/02/15 14:44:25	37
@@ -13,7 +13,7 @@ object IBSelectSQLEditorForm: TIBSelectS
     Left = 279
     Height = 15
     Top = 16
-    Width = 21
+    Width = 24
     Caption = 'SQL'
     ParentColor = False
   end
@@ -70,9 +70,9 @@ object IBSelectSQLEditorForm: TIBSelectS
   end
   object QuoteFields: TCheckBox
     Left = 24
-    Height = 19
+    Height = 22
     Top = 400
-    Width = 108
+    Width = 125
     Caption = '&Quote Identifiers'
     TabOrder = 5
   end
@@ -81,8 +81,8 @@ object IBSelectSQLEditorForm: TIBSelectS
     Height = 335
     Top = 28
     Width = 232
-    ActivePage = ExecutePage
-    TabIndex = 1
+    ActivePage = SelectPage
+    TabIndex = 0
     TabOrder = 6
     object SelectPage: TTabSheet
       Caption = 'Tables'
@@ -100,7 +100,7 @@ object IBSelectSQLEditorForm: TIBSelectS
       object Label2: TLabel
         Left = 7
         Height = 15
-        Top = 72
+        Top = 56
         Width = 33
         Caption = 'Fields'
         ParentColor = False
@@ -108,27 +108,27 @@ object IBSelectSQLEditorForm: TIBSelectS
       object Label4: TLabel
         Left = 7
         Height = 15
-        Top = 244
+        Top = 208
         Width = 77
         Caption = 'Primary Keys'
         ParentColor = False
       end
       object TableNamesCombo: TComboBox
         Left = 6
-        Height = 23
+        Height = 27
         Top = 20
         Width = 201
         AutoComplete = True
         AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
-        ItemHeight = 15
+        ItemHeight = 0
         OnCloseUp = TableNamesComboCloseUp
         TabOrder = 0
       end
       object FieldList: TListBox
         Left = 7
-        Height = 138
+        Height = 123
         Hint = 'Select Fields to include in Select Statements, or leave unselected to select all'
-        Top = 92
+        Top = 77
         Width = 204
         ItemHeight = 0
         MultiSelect = True
@@ -137,28 +137,30 @@ object IBSelectSQLEditorForm: TIBSelectS
         ScrollWidth = 202
         ShowHint = True
         TabOrder = 1
+        TopIndex = -1
       end
       object PrimaryKeyList: TListBox
         Left = 7
-        Height = 28
-        Top = 260
+        Height = 64
+        Top = 224
         Width = 200
         ItemHeight = 0
         OnDblClick = PrimaryKeyListDblClick
         ScrollWidth = 198
         TabOrder = 2
+        TopIndex = -1
       end
     end
     object ExecutePage: TTabSheet
       Caption = 'Procedures'
-      ClientHeight = 307
-      ClientWidth = 224
+      ClientHeight = 302
+      ClientWidth = 226
       OnShow = ExecutePageShow
       object Label16: TLabel
         Left = 7
         Height = 15
         Top = 3
-        Width = 89
+        Width = 100
         Caption = 'Procedure Name'
         ParentColor = False
       end
@@ -166,7 +168,7 @@ object IBSelectSQLEditorForm: TIBSelectS
         Left = 7
         Height = 15
         Top = 60
-        Width = 90
+        Width = 104
         Caption = 'Input Parameters'
         ParentColor = False
       end
@@ -174,16 +176,16 @@ object IBSelectSQLEditorForm: TIBSelectS
         Left = 8
         Height = 15
         Top = 172
-        Width = 100
+        Width = 114
         Caption = 'Output Parameters'
         ParentColor = False
       end
       object ProcedureNames: TComboBox
         Left = 7
-        Height = 23
+        Height = 27
         Top = 20
         Width = 201
-        ItemHeight = 15
+        ItemHeight = 0
         OnCloseUp = ProcedureNamesCloseUp
         ParentColor = True
         TabOrder = 0
@@ -195,8 +197,9 @@ object IBSelectSQLEditorForm: TIBSelectS
         Width = 198
         IntegralHeight = True
         ItemHeight = 0
-        ScrollWidth = 190
+        ScrollWidth = 196
         TabOrder = 1
+        TopIndex = -1
       end
       object ProcOutputList: TListBox
         Left = 7
@@ -205,14 +208,15 @@ object IBSelectSQLEditorForm: TIBSelectS
         Width = 198
         IntegralHeight = True
         ItemHeight = 0
-        ScrollWidth = 190
+        ScrollWidth = 196
         TabOrder = 2
+        TopIndex = -1
       end
       object SelectProcedure: TLabel
         Left = 7
-        Height = 13
-        Top = 291
-        Width = 103
+        Height = 14
+        Top = 285
+        Width = 126
         Anchors = [akLeft, akBottom]
         Caption = 'Is ''Select Procedure'''
         Font.Height = -11
@@ -225,9 +229,9 @@ object IBSelectSQLEditorForm: TIBSelectS
   end
   object GenerateParams: TCheckBox
     Left = 24
-    Height = 19
+    Height = 22
     Top = 376
-    Width = 152
+    Width = 171
     Caption = 'Allow DSQL Placeholders'
     TabOrder = 7
   end