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