[epuigdef]

Lo que quieres es que el cursor no salga de un cuadrado? Entonces codifica el onmousemove del form y ponle algo tal que así:

Código Delphi [-]
 
var p : TPoint;
 
 
 
    if Mouse.CursorPos.X < 100 then
    begin
        p.X := 100;
        p.Y := Mouse.CursorPos.Y;
        Mouse.CursorPos := p;
    end;
 
    if Mouse.CursorPos.X > 400 then
    begin
        p.X := 400;
        p.Y := Mouse.CursorPos.Y;
        Mouse.CursorPos := p;
    end;
 
   // y lo mismo con la Y.

Un saludo

Edu