conversion of projects with integer coordinates

I could remove all errors so far except for this statement:

StretchDraw(CurRect, Metafile);   =>  Incompatible types: 'TRect' and 'TSquare'

How can I convert CurRect to screen coordinates?


There are helper functions in DiagramUtils unit:

function Square(ALeft, ATop, ARight, ABottom: double): TSquare; overload;
function Square(ARect: TRect): TSquare; overload;
function ToRect(ASquare: TSquare): TRect;