Source position: line 0
function Size(
AWidth: Integer;
AHeight: Integer
):TSize;function Size(
ARect: TRect
):TSize;