Source position: rlmetavcl.pas line 91
procedure CanvasStretchDraw(
aCanvas: TCanvas;
const aRect: TRect;
const aData: string;
aParity: Boolean
);