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

Comparing ibx/trunk/design/ibdataseteditor.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 141 | Line 141 | begin
141    GenerateButton.Enabled := (IBSQLEditFrame1.Database <> nil) and IBSQLEditFrame1.Database.Connected;
142    TestBtn.Enabled := (IBSQLEditFrame1.Database <> nil) and IBSQLEditFrame1.Database.Connected;
143    FCurrentStatement := -1;
144 <  IBSQLEditFrame1.UserTables.Active := true;
145 <  IBSQLEditFrame1.SyncQueryBuilder(FSelectSQL);
144 >  if (IBSQLEditFrame1.Database <> nil) and IBSQLEditFrame1.Database.Connected then
145 >  begin
146 >    IBSQLEditFrame1.UserTables.Active := true;
147 >    IBSQLEditFrame1.SyncQueryBuilder(FSelectSQL);
148 >  end;
149   end;
150  
151   procedure TIBDataSetEditorForm.FormClose(Sender: TObject;

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines