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

Gtk3: fixed StretchMaskBlt(). issue #41384

Browse Source
This commit is contained in:
zeljan1 2025-01-31 18:56:15 +01:00
parent 1d5796a663
commit 0bb0a0625a
1 changed files with 1 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -4475,12 +4475,10 @@ begin
end;
ATargetRect := Rect(X, Y, Width + X, Height + Y);
ASrcRect := Rect(XSrc, YSrc, SrcWidth + XSrc, SrcHeight + YSrc);
if (DestContext.OwnsSurface) and (SrcContext.OwnsSurface) or (mask<>0) then
if (DestContext.OwnsSurface) and (SrcContext.OwnsSurface) and (mask<>0) then
DestContext.drawImage1(@ATargetRect, PgdkPixbuf(SrcContext.CurrentImage.Handle) , @ASrcRect, nil, nil)
else
DestContext.drawSurface(@ATargetRect,SrcContext.CairoSurface , @ASrcRect, nil, nil);
Result := True;
end;