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