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

Fix EAccessViolation in TDBObject.GetImageIndex:6

Browse Source
This commit is contained in:
Ansgar Becker
2023-10-22 11:13:46 +02:00
parent dead25d63c
commit ad0305c574
1 changed files with 7 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

13
source/dbconnection.pas
View File

@ -10055,13 +10055,16 @@ end;
function TDBObject.GetImageIndex: Integer;
begin
// Detect key icon index for specified db object (table, trigger, ...)
Result := -1;
case NodeType of
lntNone: begin
// Prevent AV with no connection
if FConnection <> nil then
// Prevent AV with no connection. Parameters may not have been initialized as well
if FConnection <> nil then try
Result := FConnection.Parameters.ImageIndex
else
Result := -1;
except
on E:EAccessViolation do
Result := -1;
end;
end;
lntDb: Result := ICONINDEX_DB;
@ -10086,8 +10089,6 @@ begin
lntEvent: Result := ICONINDEX_EVENT;
lntColumn: Result := ICONINDEX_FIELD;
else Result := -1;
end;
end;