pascal/lazarus-ccr
1
0
Fork 0
Code Issues Releases Activity

jvcllaz: Workaround for linux crashing in JvAnimatedImage.

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@6731 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
wp_xxyyzz
2018-11-20 17:39:23 +00:00
parent 54505768ae
commit fda7b5211c
1 changed files with 5 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
components/jvcllaz/run/JvMM/jvanimatedimage.pas
View File

@ -645,12 +645,13 @@ begin
(ClientHeight - FImageHeight) div 2, FImageWidth, FImageHeight) (ClientHeight - FImageHeight) div 2, FImageWidth, FImageHeight)
else else
DstRect := Rect(0, 0, FImageWidth, FImageHeight); DstRect := Rect(0, 0, FImageWidth, FImageHeight);
//Canvas.CopyRect(DstRect, FGlyph.Canvas, SrcRect);
// Canvas.StretchDraw(DstRect, FGlyph); {$IFDEF WINDOWS}
//{ original code:
StretchBitmapRectTransparent(Canvas, DstRect.Left, DstRect.Top, DstRect.Right - DstRect.Left, StretchBitmapRectTransparent(Canvas, DstRect.Left, DstRect.Top, DstRect.Right - DstRect.Left,
DstRect.Bottom - DstRect.Top, SrcRect, FGlyph, FTransparentColor); DstRect.Bottom - DstRect.Top, SrcRect, FGlyph, FTransparentColor);
//} {$ELSE}
Canvas.CopyRect(DstRect, FGlyph.Canvas, SrcRect);
{$ENDIF}
end; end;
end; end;