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