opensource/HeidiSQL
1
0
Fork 0
mirror of https://github.com/HeidiSQL/HeidiSQL.git synced 2026-03-13 09:24:25 +08:00
Code Issues Packages Projects Releases Wiki Activity

Fix crash after reconnect, when query helpers' functions are collapsed

Browse Source
This commit is contained in:
Ansgar Becker
2023-10-25 07:09:52 +02:00
parent 89b3fcbbdb
commit 3cdb86eefa
1 changed files with 2 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
source/main.pas
View File

@@ -10926,7 +10926,6 @@ var
FieldText, FocusedFieldText: String;
VT: TVirtualStringTree;
ResultCol: Integer;
SessionColor: TColor;
Conn: TDBConnection;
begin
if Column = -1 then
@@ -13846,7 +13845,7 @@ begin
end;
TQueryTab.HelperNodeFunctions: begin
Conn := ActiveConnection;
if Conn <> nil then
if (Conn <> nil) and (Conn.SQLFunctions.Count > Integer(Node.Index)) then
CellText := Conn.SQLFunctions[Node.Index].Name;
end;
TQueryTab.HelperNodeKeywords: CellText := MySQLKeywords[Node.Index];
@@ -13886,7 +13885,7 @@ begin
end;
TQueryTab.HelperNodeFunctions: begin
Conn := ActiveConnection;
if Conn <> nil then
if (Conn <> nil) and (Conn.SQLFunctions.Count > Integer(Node.Index)) then
CellText := Conn.SQLFunctions[Node.Index].Declaration;
end;
TQueryTab.HelperNodeProfile: begin