TSizeD

TSizeD = record
cx : double;
cy : double;
function Average: double;
property Width: double;
property Height: double;
end;

For Delphi compilers that don't support record methods (ie compilers prior to D2006), this structure is defined as an old style object instead of a record.