![]() |
Welche Maustaste OnClick?
Hallo!
Eine Frage bezüglich einer Listview: Kann man in einer OnClick-Ereignisbehandlungsroutine die Maustaste mit der geklickt wurde rausfinden? Wenn ja, wie? Vielen Dank Benne |
Re: Welche Maustaste OnClick?
Moin Benne,
wenn das OnClick durch eine Maustaste ausgelöst wurde, dann durch die Linke. |
Re: Welche Maustaste OnClick?
hi,
du müsstest das ereignis onmouseup nehmen. wie du es rausbekommst welche tasta es war, weiss nich nicht... gruss urbanbruhin |
Re: Welche Maustaste OnClick?
Das OnClick wird immer durch die StandardMaustaste ausgelöst. Wenn in der Systemsteuerung die Maustasten vertauscht werden dann wird das onClick durch die andere Maustaste augelöst. Im Programm ist dies immer die Linke da Windows die Maustasten bereits umtauscht wenn dies eingestellt ist.
|
Re: Welche Maustaste OnClick?
hi, ich bins nochmal
erst mal ein juhuiii!!, 200ter Beitrag!! und dann zum thema: mit
Delphi-Quellcode:
müsste es gehen
procedure TForm1.ListView1MouseUp(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer); begin if button = mbright then showmessage('rechts') else showmessage('links') end; gruss urbanbruhin |
Re: Welche Maustaste OnClick?
Vielen Dank!
Benne |
Re: Welche Maustaste OnClick?
Kleiner Fehler im Code: Der else-Zweig wird bei JEDER anderen Maustaste ausgelöst. Also auch bei der mittleren oder bei einer anderen Maustaste (manche Mäuse haben ja auch an den Seiten Tasten). Also lieber so:
Delphi-Quellcode:
procedure TForm1.ListView1MouseUp(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer); begin if button = mbright then showmessage('rechts') else if button = mbleft then showmessage('links') end; |
Re: Welche Maustaste OnClick?
Zitat:
|
Re: Welche Maustaste OnClick?
Warum das "else"? Geht auch ohne...
|
Re: Welche Maustaste OnClick?
Zitat:
Ist auch ein wenig eine Frage des Programmierstils ;) |
Alle Zeitangaben in WEZ +1. Es ist jetzt 06:37 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz