paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-05-28 16:42:47 +02:00
Code Issues Packages Projects Releases Wiki Activity

changes for fpc 1.1

Browse Source 
git-svn-id: trunk@2041 -
This commit is contained in:
mattias 2002-08-17 23:40:45 +00:00
parent 85b0cec36c
commit 638395d2fc
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lcl/interfaces/gtk/gtkwinapi.inc
View File

@ -5185,7 +5185,7 @@ begin
if Winding then begin
Tmp := CreateRectRGN(0,0,0,0);
GetClipRGN(DC, Tmp);
RGN := CreatePolygonRgn(Points, OldNumPts, True);
RGN := CreatePolygonRgn(Points, OldNumPts, LCLType.Winding);
ExtSelectClipRGN(DC, RGN, RGN_AND);
DeleteObject(RGN);
GetClipBox(DC, @ClipRect);
@ -7570,6 +7570,9 @@ end;
{ =============================================================================
$Log$
Revision 1.197 2002/12/27 08:46:32 mattias
changes for fpc 1.1
Revision 1.196 2002/12/26 11:00:15 mattias
added included by to unitinfo and a few win32 functions