paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-30 10:50:53 +02:00
Code Issues Packages Projects Releases Wiki Activity

lcl: change gradient types from longint to Cardinal (matches windows declarations)

Browse Source 
git-svn-id: trunk@31267 -
This commit is contained in:
blikblum 2011-06-18 00:01:28 +00:00
parent a8a3b23fa0
commit 36e0a4b59f
1 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
lcl/lcltype.pp
View File

@ -1183,17 +1183,17 @@ type
PGradientTriangle = ^tagGradientTriangle;
tagGRADIENTTRIANGLE = record
Vertex1: Longint;
Vertex2: Longint;
Vertex3: Longint;
Vertex1: Cardinal;
Vertex2: Cardinal;
Vertex3: Cardinal;
end;
GRADIENTTRIANGLE = tagGRADIENTTRIANGLE;
TGradientTriangle = GRADIENTTRIANGLE;
PGradientRect = ^tagGradientRect;
tagGRADIENTRECT = record
UpperLeft: Longint;
LowerRight: Longint;
UpperLeft: Cardinal;
LowerRight: Cardinal;
end;
GRADIENTRECT = tagGRADIENTRECT;
TGradientRect = GRADIENTRECT;