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

Gtk3: create DC from window if possible.

Browse Source
This commit is contained in:
zeljan1 2025-01-14 10:25:44 +01:00
parent 4f51192d03
commit f59489a32a
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lcl/interfaces/gtk3/gtk3winapi.inc
View File

@ -2031,7 +2031,10 @@ begin
Result := Widget.Context;
if (Result = 0) then
begin
Result := HDC(TGtk3DeviceContext.Create(Widget.GetContainerWidget, False));
if Gtk3IsGdkWindow(Widget.GetWindow) then
Result := HDC(TGtk3DeviceContext.Create(Widget.GetWindow, True))
else
Result := HDC(TGtk3DeviceContext.Create(Widget.GetContainerWidget, False));
TGtk3DeviceContext(Result).CanRelease := True;
end;
end else