Z.B. den Cursor in einem Formular "einsperren":
Delphi-Quellcode:
var ARect: TRect;
begin
ARect.Top := Form1.top;
ARect.Left:= Form1.Left;
ARect.Right:= Form1.Left+Form1.Width;
ARect.Bottom := Form1.top+Form1.Height;
ClipCursor(@ARect);
end;
//Rückgängig machen
ClipCursor(nil);
//den Cursor plazieren mit SetCursorPos z.B. in die Mitte eines Panels
SetCursorPos(Panel1.Left+(Panel1.Width div 2),Panel1.top+(Panel1.Height div 2));