opensource/HeidiSQL
1
0
Fork 0
mirror of https://github.com/HeidiSQL/HeidiSQL.git synced 2025-08-26 20:50:20 +08:00
Code Issues Packages Projects Releases Wiki Activity

Fix old query result from disconnected session being displayed as Node|Node|...

Browse Source
This commit is contained in:
Ansgar Becker
2009-01-05 18:09:49 +00:00
parent e8ee48635e
commit 925f42ffc7
1 changed files with 6 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files

13
source/main.pas
View File

@ -1191,9 +1191,14 @@ begin
SaveListSetup(ListTables); SaveListSetup(ListTables);
SaveListSetup(ListColumns); SaveListSetup(ListColumns);
FreeAndNil(CreateTableForm); FreeAndNil(CreateTableForm);
debug('mem: clearing query and browse data.');
SetLength(FDataGridResult.Rows, 0);
SetLength(FDataGridResult.Columns, 0);
SetLength(FQueryGridResult.Rows, 0);
SetLength(FQueryGridResult.Columns, 0);
ValidateControls(False); ValidateControls(False);
Action := caFree; Action := caFree;
@ -1726,12 +1731,6 @@ begin
FreeAndNil(DatabasesWanted); FreeAndNil(DatabasesWanted);
FreeAndNil(Databases); FreeAndNil(Databases);
debug('mem: clearing query and browse data.');
SetLength(FDataGridResult.Rows, 0);
SetLength(FDataGridResult.Columns, 0);
SetLength(FQueryGridResult.Rows, 0);
SetLength(FQueryGridResult.Columns, 0);
// Closing connection // Closing connection
if Assigned(FMysqlConn) then begin if Assigned(FMysqlConn) then begin
LogSQL('Closing connection to "'+SessionName+'" session (' + FMysqlConn.Connection.hostname + ') ...'); LogSQL('Closing connection to "'+SessionName+'" session (' + FMysqlConn.Connection.hostname + ') ...');