# | Line 28 | Line 28 | |
---|---|---|
28 | ||
29 | unit IBUpdateSQL; | |
30 | ||
31 | + | {$Mode Delphi} |
32 | + | |
33 | interface | |
34 | ||
35 | < | uses Windows, SysUtils, Graphics, Classes, Controls, Db, StdVCL, |
34 | < | IB, IBCustomDataSet, IBQuery; |
35 | > | uses SysUtils, Classes, DB, IB, IBCustomDataSet, IBQuery; |
36 | ||
37 | type | |
38 | { TIBUpdateSQL } | |
# | Line 67 | Line 68 | type | |
68 | ||
69 | implementation | |
70 | ||
71 | + | uses Variants; |
72 | + | |
73 | { TIBUpdateSQL } | |
74 | ||
75 | constructor TIBUpdateSQL.Create(AOwner: TComponent); |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |