Wylaczyc ograniczenie myszy

Witam mam proceduer ograniczajaca mysze:

var Obszar:TRect;
begin
Obszar.Top:=0;
Obszar.Left:=0;
Obszar.Right:=20;
Obszar.Bottom:=20;
ClipCursor(@Obszar);
end;

Ale nie wiem jak ja wylaczyc =P
(wylaczyc samam procedure a nie aplikacje)

Z gory THX za help...

To samo dla:
Top: 0
Left: 0
Width: ScreenWidth
Height: ScreenHeight

albo dla nil ...

/kto mi usunął kropki po Screen??/

trza Screen.Width a nie ScreenWidth; z height analogicznie

tez dzila wielkie THX...