Source position: lcltype.pp line 1176
type tagGRADIENTRECT = record
UpperLeft: LongInt;
LowerRight: LongInt;
end;