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; |