Forum: Object-Pascal / Delphi-Language
Delphi
by Niels,
14. Jan 2004
Moin!
Du hast den Code sicherlich im OnMouseMove drin. Das wird jedoch soviel ich weiß nicht aufgerufen wenn du die Cursorposition mit SetCursorPos veränderst. Du kanns ja aber die Prozedur zur Mauspositionsanzeige aus der, wo das SetCursorPos steht nach jeder Positionsänderung aufrufen.
MfG Niels
Forum: Object-Pascal / Delphi-Language
Delphi
by Niels,
4. Jan 2004
Moin!
Zu der Frage welches Ereignis du nehmen musst...Im OnMove würdest du gleich X- und Y-Position der Maus auf der PaintBox bekommen.
Der Befehl den du dann dort rein schreibst könnte z.B. so aussehen:
Windows.SetCursorPos(Mouse.CursorPos.X, Mouse.CursorPos.Y + Form1.PaintBox1.Height - Y - (f(X)));
f(X) wäre deine Funktion, die du ja im Quelltext weiter oben definieren kannst. z.B: