paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-27 18:33:50 +02:00
Code Issues Packages Projects Releases Wiki Activity

customdrawnws: Fixes compilation with fpc 2.4

Browse Source 
git-svn-id: trunk@33746 -
This commit is contained in:
sekelsenmat 2011-11-24 07:41:52 +00:00
parent bd3a4c7440
commit a5a68f3e4c
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/customdrawn/customdrawnwinapi.inc
View File

@ -2249,7 +2249,9 @@ begin
exit;
lOldBrush := SelectObject(DC, Brush);
{$ifndef ver2_4}
LazDC.FillRect(Rect);
{$endif}
SelectObject(DC, lOldBrush);
Result := True;