paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-07 13:38:00 +02:00
Code Issues Packages Projects Releases Wiki Activity

Cocoa: fix the issues related to Canvas Clipping, especially on version < macOS 11

Browse Source
This commit is contained in:
rich2014 2024-07-02 20:21:48 +08:00
parent d0d80cf295
commit fdbb1e6aa3
1 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
lcl/interfaces/cocoa/cocoagdiobjects.pas
View File

@ -1436,10 +1436,12 @@ begin
FBkBrush.Free;
if Assigned(ctx) then begin
if Assigned(CGContext()) and Flipped then
if Clipped then
CGContextRestoreGState(CGContext());
if Flipped then
CGContextRestoreGState(CGContext());
ctx.release;
end;
end;
if Assigned(boxview) then boxview.release;
inherited Destroy;
end;