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