Cursor.Clip (limitar cursor en pantalla)

[[escafandra]]

Empezado por ecfisa

...Para limitar el movimiento del mouse al area cliente del form: ....

¿Que tal de esta forma?

Código Delphi [-]
procedure TForm1.FormActivate(Sender: TObject);
var
  R: TRect;
begin
  R:= GetClientRect;
  MapWindowPoints(Handle, 0, R, 2);
  ClipCursor(@R);
end;

Saludos.