paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-11-20 17:39:43 +01:00
Code Issues Packages Projects Releases Wiki Activity

Qt: StretchMaskBlt(): fixed bug in statement for stretching dst width & height. fixes #16910

Browse Source 
git-svn-id: trunk@26603 -
This commit is contained in:
zeljko 2010-07-11 20:03:57 +00:00
parent 2682f943c6
commit 5c853d1f08
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lcl/interfaces/qt/qtwinapi.inc
View File

@ -5536,10 +5536,10 @@ begin
//
// stretch_factor := Width / SrcWidth;
// Width := stretch_factor * (SrcWidthOrig - XSrc);
if (SrcWidthOrig - XSrc < SrcWidth) then
if (SrcWidthOrig - XSrc < SrcWidth - XSrc) then
Width := Width * (SrcWidthOrig - XSrc) div SrcWidth;
if (SrcHeightOrig - YSrc < SrcHeight) then
if (SrcHeightOrig - YSrc < SrcHeight - YSrc) then
Height := Height * (SrcHeightOrig - YSrc) div SrcHeight;
if dx <> 0 then // apply shifts