paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-09-25 05:39:14 +02:00
Code Issues Packages Projects Releases Wiki Activity

use better stretch blitting mode by default (from Patrick Chevalley)

Browse Source 
git-svn-id: trunk@10245 -
This commit is contained in:
micha 2006-11-26 15:16:29 +00:00
parent 268922b4be
commit 666855ac8d
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lcl/interfaces/win32/win32winapi.inc
View File

@ -3187,6 +3187,8 @@ Var
SaveObj: HGDIOBJ;
PrevTextColor, PrevBkColor: COLORREF;
Begin
Windows.SetStretchBltMode(DestDC, STRETCH_HALFTONE);
Windows.SetBrushOrgEx(DestDC, 0, 0, nil);
if Mask = 0 then
begin
if (Width = SrcWidth) and (Height = SrcHeight) then