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

Comparing ibx/trunk/design/ibupdatesqleditor.pas (file contents):
Revision 80 by tony, Mon Jan 1 11:31:07 2018 UTC vs.
Revision 81 by tony, Mon Jan 1 11:31:10 2018 UTC

# Line 139 | Line 139 | begin
139    GenerateButton.Enabled := (IBSQLEditFrame1.Database <> nil) and IBSQLEditFrame1.Database.Connected;
140    TestBtn.Enabled := (IBSQLEditFrame1.Database <> nil) and IBSQLEditFrame1.Database.Connected;
141    FCurrentStatement := -1;
142 <  IBSQLEditFrame1.UserTables.Active := true;
143 <  IBSQLEditFrame1.SyncQueryBuilder(FRefreshSQL);
142 >  if (IBSQLEditFrame1.Database <> nil) and IBSQLEditFrame1.Database.Connected then
143 >  begin
144 >    IBSQLEditFrame1.UserTables.Active := true;
145 >    IBSQLEditFrame1.SyncQueryBuilder(FRefreshSQL);
146 >  end;
147   end;
148  
149   procedure TIBUpdateSQLEditorForm.FormClose(Sender: TObject;

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines