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

Cocoa: added cocoa workaround until cocoa StretchBlt is fixed.

Browse Source
This commit is contained in:
zeljan1 2025-01-02 13:31:14 +01:00
parent 9b147ce82b
commit c8df21aee3
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
components/turbopower_ipro/iphtml.pas
View File

@ -3448,7 +3448,7 @@ begin
R := FClientRect;
R.Right := Round(R.Right * AScale);
R.Bottom := Round(R.Bottom * AScale);
TargetCanvas.CopyRect(R, PaintBuffer, R);
TargetCanvas.CopyRect({$IFDEF LCLCocoa}FClientRect{$ELSE}R{$ENDIF}, PaintBuffer, R);
FClientRect := R;
end
else