--- ibx/trunk/design/ibsqleditor.pas	2016/01/26 14:38:47	36
+++ ibx/trunk/design/ibsqleditor.pas	2016/02/15 14:44:25	37
@@ -103,6 +103,8 @@ type
     FTableName: string;
     FIBSystemTables: TIBSystemTables;
     FExecuteOnly: boolean;
+  protected
+    procedure Loaded; override;
   public
     { public declarations }
     constructor Create(TheOwner: TComponent); override;
@@ -370,6 +372,15 @@ begin
   FIBSystemTables.GetFieldNames(InsertTableNames.Text,InsertFieldsList.Items);
 end;
 
+procedure TIBSQLEditorForm.Loaded;
+begin
+  inherited Loaded;
+  {$IFDEF WINDOWS}
+  if assigned(PageControl) then
+    PageControl.TabPosition := tpTop;
+  {$ENDIF}
+end;
+
 constructor TIBSQLEditorForm.Create(TheOwner: TComponent);
 begin
   inherited Create(TheOwner);