Maus auf einer Form einschränken!

[Cöster]

Zitat von smart:

Delphi-Quellcode:

If X < 0 then 
  Mouse.CursorPos := Point(Top + Form1.Top + (Height- ClientHeight) div 2, Mouse.CursorPos.Y);

den Code versteh ich nicht? Warum X < 0? Außerdem fixierst du hier die x und nicht die y-Koordinate. Ist Top nicht das selbe wie Form1.Top?

Ich würde es entweder wie Sunlight meine mit ClipCursor machen, oder in FormMouseMove den y-Wert immer wieder auf eine Konstante setzen. Auf welcher Höhe soll der Cursor denn fixiert werden? In der Mitte des ClientBereichs der Form?

EDIT: @ Sunlight:
Bei dem Code kann sich die Maus aber doch weiterhin hoch und runter bewegen.