--- ibx/trunk/design/ibmodifysqleditor.pas	2016/09/22 17:10:15	44
+++ ibx/trunk/design/ibmodifysqleditor.pas	2016/12/06 10:33:46	45
@@ -32,7 +32,7 @@ interface
 
 uses
   Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs,
-  StdCtrls, ComCtrls, IBSystemTables, IBDatabase, IBCustomDataSet;
+  StdCtrls, ComCtrls, IBSystemTables, IBDatabase, IBCustomDataSet, IB;
 
 type
 
@@ -91,8 +91,6 @@ function EditSQL(DataSet: TIBCustomDataS
 
 implementation
 
-uses IBSQL;
-
 {$R *.lfm}
 
  function EditSQL(DataSet: TIBCustomDataSet; SelectSQL: TStrings): boolean;
@@ -129,7 +127,7 @@ end;
 
 procedure TIBModifySQLEditorForm.FormShow(Sender: TObject);
 var IsProcedureName: boolean;
-    SQLType: TIBSQLTypes;
+    SQLType: TIBSQLStatementTypes;
 begin
   GenerateBtn.Enabled := (IBTransaction1.DefaultDatabase <> nil) and IBTransaction1.DefaultDatabase.Connected;
   TestBtn.Enabled := (IBTransaction1.DefaultDatabase <> nil) and IBTransaction1.DefaultDatabase.Connected;