opensource/HeidiSQL
1
0
Fork 0
mirror of https://github.com/HeidiSQL/HeidiSQL.git synced 2025-08-16 11:42:12 +08:00
Code Issues Packages Projects Releases Wiki Activity

Work around access violation in "Fetch database items" when active database is processed. Fixes issue #3559.

Browse Source
This commit is contained in:
Ansgar Becker
2014-05-22 09:17:27 +00:00
parent 7d5a5eba32
commit e222353b84
1 changed files with 1 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
source/main.pas
View File

@ -6661,10 +6661,7 @@ begin
Conn := ActiveConnection; Conn := ActiveConnection;
while Assigned(Node) do begin while Assigned(Node) do begin
db := ListDatabases.Text[Node, 0]; db := ListDatabases.Text[Node, 0];
if db = ActiveDatabase then Conn.GetDBObjects(db, True);
RefreshTree
else
Conn.GetDBObjects(db, True);
ListDatabases.RepaintNode(Node); ListDatabases.RepaintNode(Node);
DBtree.RepaintNode(FindDBNode(DBtree, Conn, db)); DBtree.RepaintNode(FindDBNode(DBtree, Conn, db));
Node := GetNextNode(ListDatabases, Node, True); Node := GetNextNode(ListDatabases, Node, True);