ViewVC Help
View File | Revision Log | Show Annotations | Download File | View Changeset | Root Listing
root/public/ibx/trunk/design/ibmodifysqleditor.pas
(Generate patch)

Comparing ibx/trunk/design/ibmodifysqleditor.pas (file contents):
Revision 33 by tony, Sat Jul 18 12:30:52 2015 UTC vs.
Revision 45 by tony, Tue Dec 6 10:33:46 2016 UTC

# Line 32 | Line 32 | interface
32  
33   uses
34    Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs,
35 <  StdCtrls, ComCtrls, IBSystemTables, IBDatabase, IBCustomDataSet;
35 >  StdCtrls, ComCtrls, IBSystemTables, IBDatabase, IBCustomDataSet, IB;
36  
37   type
38  
# Line 91 | Line 91 | function EditSQL(DataSet: TIBCustomDataS
91  
92   implementation
93  
94 uses IBSQL;
95
94   {$R *.lfm}
95  
96   function EditSQL(DataSet: TIBCustomDataSet; SelectSQL: TStrings): boolean;
# Line 129 | Line 127 | end;
127  
128   procedure TIBModifySQLEditorForm.FormShow(Sender: TObject);
129   var IsProcedureName: boolean;
130 <    SQLType: TIBSQLTypes;
130 >    SQLType: TIBSQLStatementTypes;
131   begin
132    GenerateBtn.Enabled := (IBTransaction1.DefaultDatabase <> nil) and IBTransaction1.DefaultDatabase.Connected;
133    TestBtn.Enabled := (IBTransaction1.DefaultDatabase <> nil) and IBTransaction1.DefaultDatabase.Connected;

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines