Auf das Bewegen der Maus reagieren

Aus RAD Studio
Wechseln zu: Navigation, Suche

Nach oben zu Mit Grafiken und Multimedia arbeiten - Index

Das Ereignis OnMouseMove tritt auf, wenn der Benutzer die Maus bewegt. Das Ereignis wird dem Objekt übergeben, das sich unter dem Mauszeiger befindet, wenn die Maustaste gedrückt wird. Sie haben damit die Möglichkeit, dem Benutzer durch Zeichnen temporärer Linien die Mausbewegung anzuzeigen.

Um auf das Bewegen der Maus zu reagieren, definieren Sie eine Ereignisbehandlungsroutine für OnMouseMove. Das folgende Beispiel verwendet OnMouseMove-Ereignisse, um temporäre Formen auf einem Formular zu zeichnen, während der Anwender die Maustaste gedrückt hält. Der Anwender kann dadurch die Mausbewegung besser nachvollziehen. Die Behandlungsroutine für OnMouseMove zeichnet im Formular eine Linie zu der Position, an der das Ereignis aufgetreten ist:



 procedure TForm1.FormMouseMove(Sender: TObject;Button: TMouseButton;
 Shift: TShiftState; X, Y: Integer);
 begin
 Canvas.LineTo(X, Y); { Linie zur aktuellen Position zeichnen }
 end;



 void __fastcall TForm1::FormMouseMove(TObject *Sender, TMouseButton Button,
   TShiftState Shift, int X, int Y)
 {
   Canvas->LineTo(X, Y);
 }



Die Bewegung der Maus über das Formular bewirkt das Zeichnen einer Linie, die dem Mauszeiger folgt, und zwar auch dann, wenn die Maustaste noch nicht gedrückt wurde.

OnMouseMove-Ereignisse treten auch dann ein, wenn die Maustaste nicht gedrückt wurde.

Wenn Sie abfragen möchten, ob eine Maustaste gedrückt wurde, müssen Sie dem Formularobjekt ein Objektfeld hinzufügen.

Siehe auch