Source position: kgraphics.pas line 819
procedure TranslateRectToDevice(
DC: HDC;
var ARect: TRect
);