paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-17 15:39:30 +02:00
Code Issues Packages Projects Releases Wiki Activity

Gtk3: better check if cairo is valid.

Browse Source
This commit is contained in:
zeljan1 2025-01-14 11:22:26 +01:00
parent 2a59941a59
commit 8a8026c0c8
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lcl/interfaces/gtk3/gtk3object.inc
View File

@ -763,6 +763,8 @@ end;
function TGtk3WidgetSet.IsValidDC(const DC: HDC): Boolean; function TGtk3WidgetSet.IsValidDC(const DC: HDC): Boolean;
begin begin
Result := DC <> 0; Result := DC <> 0;
if Result then
Result := TGtk3DeviceContext(DC).pcr <> nil;
end; end;
function TGtk3WidgetSet.IsValidGDIObject(const AGdiObject: HGDIOBJ): Boolean; function TGtk3WidgetSet.IsValidGDIObject(const AGdiObject: HGDIOBJ): Boolean;