--- ibx/trunk/design/ibdeletesqleditor.pas	2016/09/22 17:10:15	44
+++ ibx/trunk/design/ibdeletesqleditor.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
 
@@ -125,7 +125,7 @@ end;
 
 procedure TIBDeleteSQLEditorForm.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;