Source position: lclproc.pas line 157
procedure MoveRect(
var ARect: TRect;
x: Integer;
y: Integer
);