Fix AV on application exit while datagrid has pending changes. Fixes issue #1780.

This commit is contained in:
Ansgar Becker
2010-03-24 13:45:48 +00:00
parent ed5ec1e122
commit d67f746de8

View File

@@ -1135,13 +1135,13 @@ begin
FreeAndNil(CreateDatabaseForm);
FreeAndNil(SearchReplaceDialog);
// Close database connection
DoDisconnect;
// Clearing query and browse data.
SetLength(DataGridResult.Rows, 0);
SetLength(DataGridResult.Columns, 0);
// Close database connection
DoDisconnect;
// Save various settings
OpenRegistry;
MainReg.WriteInteger(REGNAME_TOOLBAR2LEFT, ToolBarStandard.Left);