Mouse Move Ereignis: welche Taste ist gedrückt ?

M. Raab · Beiträge: 334 Erhaltene Danke: 1 WIN 7 Delphi XE

Hallo,

ich habe auf einem Form ein Image und möchte auf diesem Image zeichnen. Mit der Maus kann man klicken und zieht die Maus dann - dann erscheint eine Linie.

Problem nun: in meinem MouseMove Ereignis kann ich nicht feststellen, welche Maustaste gedrückt wurde. Ich könnte nun beim MouseDown Ereignis die Taste festhalten und diese Info dann im MouseMove Ereignis verwenden. Gibt es aber keine Möglichkeint im MouseMove Ereignis festzustellen, welche Taste gedrückt wurde ? Ziel wäre es zu wissen, mit welcher Maustaste der Nutzer die Maus zieht ?

Gruss

Markus

Moderiert von Gausi: Topic aus Sonstiges (Delphi) verschoben am So 29.01.2006 um 14:49

_________________
Das Leben besteht aus Bits und Bytes - nur: wo laufen sie denn ????
Super ... Du kannst das zwar lesen, toll..... aber: völlig zwecklos !!!

Gausi · Verfasst: So 29.01.06 15:49

Guck mal nach, was das hervorgehobene so bedeutet ;-)

markieren

Delphi-Quelltext

1:	TForm1.Image1MouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer);

_________________
We are, we were and will not be.

Lannes · Verfasst: So 29.01.06 15:49

Hallo,

bei mir geht das so:

markieren

Delphi-Quelltext

1:
2:
3:
4:

  if ssLeft in Shift then
    Caption := 'Linke Maustaste';
  if ssRight in Shift then
    Caption := 'Rechte Maustaste';

_________________
MfG Lannes
(Nichts ist nicht Nichts) and ('' <> nil ) and (Pointer('') = nil ) and (@('') <> nil )

M. Raab · Beiträge: 334 Erhaltene Danke: 1 WIN 7 Delphi XE

Hallöchen,

Peinlich wa ????

Nun ja: ich dachte Shift hätte nur was mit den Tasten zu tun....

Aber: es klappt !!

Vielen Dank und Gruss

Markus

_________________
Das Leben besteht aus Bits und Bytes - nur: wo laufen sie denn ????
Super ... Du kannst das zwar lesen, toll..... aber: völlig zwecklos !!!

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme