Scales one rectangle to fit into another.

function ScaleRectToRect(const SourceRect: TRect; 
                         const TargetRect: TRect): TRect;

ImagingUtility (at line 287)

Proportions are preserved so it could be used for 'Stretch To Fit Window' image drawing for instance.