--- ibx/trunk/runtime/IBUpdateSQL.pas	2000/07/31 16:43:00	4
+++ ibx/trunk/runtime/IBUpdateSQL.pas	2011/02/18 16:26:16	5
@@ -28,10 +28,11 @@
 
 unit IBUpdateSQL;
 
+{$Mode Delphi}
+
 interface
 
-uses Windows, SysUtils, Graphics, Classes, Controls, Db, StdVCL,
-     IB, IBCustomDataSet, IBQuery;
+uses SysUtils, Classes, DB, IB, IBCustomDataSet, IBQuery;
 
 type
 { TIBUpdateSQL }
@@ -67,6 +68,8 @@ type
 
 implementation
 
+uses Variants;
+
 { TIBUpdateSQL }
 
 constructor TIBUpdateSQL.Create(AOwner: TComponent);