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

Silence sporadic EAccessViolation in DBtreeBeforeCellPaint, when reading DbObj.Connection.Parameters, found in uploaded reports

Browse Source
This commit is contained in:
Ansgar Becker
2023-10-22 10:57:27 +02:00
parent 99fdbe8b4b
commit dead25d63c
1 changed files with 2 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
source/main.pas
View File

@ -13252,7 +13252,7 @@ var
DBObj: PDBObject; DBObj: PDBObject;
AllObjects: TDBObjectList; AllObjects: TDBObjectList;
begin begin
if CellPaintMode=cpmPaint then begin if CellPaintMode=cpmPaint then try
DBObj := Sender.GetNodeData(Node); DBObj := Sender.GetNodeData(Node);
if DbObj.Connection.Parameters.SessionColor <> AppSettings.GetDefaultInt(asTreeBackground) then begin if DbObj.Connection.Parameters.SessionColor <> AppSettings.GetDefaultInt(asTreeBackground) then begin
TargetCanvas.Brush.Color := DbObj.Connection.Parameters.SessionColor; TargetCanvas.Brush.Color := DbObj.Connection.Parameters.SessionColor;
@ -13262,6 +13262,7 @@ begin
AllObjects := DBObj.Connection.GetDBObjects(DBObj.Database); AllObjects := DBObj.Connection.GetDBObjects(DBObj.Database);
PaintColorBar(DBObj.Size, AllObjects.LargestObjectSize, TargetCanvas, CellRect); PaintColorBar(DBObj.Size, AllObjects.LargestObjectSize, TargetCanvas, CellRect);
end; end;
except; // Silence sporadic EAccessViolation when reading DbObj.Connection.Parameters, found in uploaded reports
end; end;
end; end;