Source position: kgraphics.pas line 628
procedure CanvasGetScale(
ACanvas: TCanvas;
out MulX: Integer;
out MulY: Integer;
out DivX: Integer;
out DivY: Integer
);