Delphi-PRAXiS
Seite 1 von 2  1 2      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi Doppelklick in MouseDown erkennen (MouseDown vs. DblClick) (https://www.delphipraxis.net/149040-doppelklick-mousedown-erkennen-mousedown-vs-dblclick.html)

CodeX 12. Mär 2010 22:40


Doppelklick in MouseDown erkennen (MouseDown vs. DblClick)
 
Ich möchte beim TrayIcon (CoolTrayIcon) gerne unterschiedliche Aktionen je nach Klick-Art durchführen.

Im OnMouseDown Ereignis greife ich nun die linke und die rechte Maustaste ab und im OnDblClick Ereignis einen Doppelklick. Das Problem ist nun, dass bei einem Doppelklick auch das Ereignis vom einfachen Linksklick durchgeführt wird, was natürlich nicht sein darf.

Wie kann ich jetzt im OnMouseDown Ereignis erkennen, ob es sich bei diesem Klick um Teil eines Doppelklicks handelt, um die Aktion dann entsprechend nicht auszuführen? Sender, Button, Shift und X,Y helfen mir da irgendwie nicht weiter...

Oder ganz anders?

blablab 12. Mär 2010 23:12

Re: Doppelklick in MouseDown erkennen (MouseDown vs. DblClic
 
Das Problem ist, dass der Einfachklick schon vor dem Doppelklick ausgelöst wird. Das bedeutet also, dass du das nur umgehen kannst, wenn du nach einem Einfachklich eine bestimmte Zeit wartest und erst dann reagierst, wenn in dieser Zeit kein 2. mal geklickt wurde. Das ganze wird dann sehr unschön, weil es ungewohnt ist, dass nicht sofort auf einen Einfachklich reagiert wird. Du solltest dir also vorher nochmal überlegen ob das sinnvoll ist...

stoxx 13. Mär 2010 09:37

Re: Doppelklick in MouseDown erkennen (MouseDown vs. DblClic
 
gibts denn bei Deinem CoolTrayIcon kein OnClick Event und OnDblClick Event?
hat doch eigentlich jede Komponente, probiere es mit einem Panel aus.
Da wird alles schon unterschieden .. und macht Windows automatisch.
die persönlich gewünschte Sensitivität zur Unterscheidung von Click und Dbl Click kann man doch in der Systemsteuerung einstellen ..
Wenn Du noch linke und rechte Maustaste unterscheiden willst, dann merke Dir im OnMousedown, was geklickt wurde, und im OnClick machst Du die entsprechenden Sachen, MouseDown kommt eher als OnClick

CodeX 13. Mär 2010 15:21

Re: Doppelklick in MouseDown erkennen (MouseDown vs. DblClic
 
Das Problem ist, dass OnClick nicht bei einem Rechtsklick ausgeführt wird. D.h. es bringt auch nichts, sich die Maustausche bei OnMouseDown zu merken. Das war der Grund, warum ich auf OnClick verzichten wollte. Aber nun gut, jetzt habe ich das auf die einzelnen Ereignisse verteilt. Linksklick greife ich bei OnClick ab, Doppelklick bei OnDblClick und den Rechtsklick bei OnMouseDown mit Button = mbRight.

Damit sollte das jetzt passen. Danke für Eure Hinweise!

himitsu 13. Mär 2010 15:27

Re: Doppelklick in MouseDown erkennen (MouseDown vs. DblClic
 
Nimm statt OnMouseDown besser OnMouseUp ... erstmal kann es so keine Probleme bei der Tastenbehandlung ergeben, da der Mausklick an dieser Stelle quasi schon beendet ist.

Außerdem kann man, wie bei einem Linksklick auch den Klick noch "abbrechen",
so wie es z.B. standardmäßig bei allen Buttons und Menüs auch ist.

> Mit Rechts anklicken, die Maus wegziehen und dann erst die Taste loslassen = kein Rechtsklick.

CodeX 13. Mär 2010 15:46

Re: Doppelklick in MouseDown erkennen (MouseDown vs. DblClic
 
Du hast Recht. Vielen Dank! :)

Delphi-Laie 15. Mär 2010 11:45

Re: Doppelklick in MouseDown erkennen (MouseDown vs. DblClic
 
Dieses Verhalten, daß bei einem Doppelklick mindestens ein oder gar zwei Einfachklickereignis(se) erkannt werden (bei einem vorher, bei zweien eines davor und eines danach), stört mich auch. Mir fiel es auch auf, und zwar als erstes in der TTrayIcon-Klasse in Lazarus, dann auch in der gleichnamigen Klasse in Turbo-Delphi auf.

Dass muß jedoch nicht so sein! Die Komponente CoolTrayIcon (sie liefert zwei TNA-Icons (ein animierbares und ein textuelles), kann in der mir vorliegenden Version (4.3.1) zwischen Einfach- und Doppelklick sauber unterscheiden. Ich werde wohl mal die Quelltexte dieser Komponente inspizieren.

Weiß jemand, ob Windows selbst schon zwischen diese beiden Klickarten unterscheiden kann/muß?

Edit: Inzwischen herausgefunden, daß bei CoolTrayIcon nach dem sog. MouseUpEvent noch ein klein wenig (nur unauffällig wenig, also nicht störend) Zeit (in der Variable GetDoubleClickTime fixiert) vergeht, bis das Einfachklickereignes ausgelöst wird, anzunehmenderweise, um zur Sicherheit abzuwarten, ob nicht doch ein Doppelklick vorliegt.

Benmik 30. Dez 2018 21:28

AW: Doppelklick in MouseDown erkennen (MouseDown vs. DblClick)
 
Da der Titel gut passt (der Inhalt ist eigentlich etwas anders), mache ich kein neues Thema auf.

Nachdem mich ein völlig unerklärlicher Bug eben völlig verrückt gemacht hat, habe ich ich bei einem Blick in Vcl.Controls gesehen, dass Delphi nach einem Doppelklick noch ein MouseDown anhängt.

Dass vorher MouseDown und MouseUp und Click und was weiß ich was kommen, dass wusste ich ja, aber ein unmotiviertes, überfallartiges MouseDown einfach so nach beendetem Doppelklick - wer denkt sich sowas aus ?!?!

Ich habe jetzt ein
Delphi-Quellcode:
If GetKeyState(VK_LBUTTON) < 0
eingefügt, um das "echte" MouseDown zu erkennen (siehe übrigens auch hier). Welchem Zweck dient dieses bescheuerte MouseDown?

Schokohase 31. Dez 2018 08:24

AW: Doppelklick in MouseDown erkennen (MouseDown vs. DblClick)
 
Überleg doch einfach mal wann ein MouseDown und MouseUp Event kommt.

Genau, wenn man den Maus-Button herunterdrückt (Down) und wieder loslässt (Up).

Und was ist ein Doppelklick?

Genau, wenn man hintereinander zweimal den Maus-Button herunterdrückt und loslässt.

Diese Events kommen also nicht von Delphi sondern von deinem Finger auf der Maus. Die einzig berechtigte Frage hier ist ob es wirklich sinnvoll ist wenn (in Delphi) der Doppelklick anhand des MouseDown Events erkannt wird. Schliesslich wird der einfache Klick anhand des MouseUp Events erkannt.

Uwe Raabe 31. Dez 2018 11:17

AW: Doppelklick in MouseDown erkennen (MouseDown vs. DblClick)
 
Zitat:

Zitat von Benmik (Beitrag 1422339)
Da der Titel gut passt (der Inhalt ist eigentlich etwas anders), mache ich kein neues Thema auf.

Finde ich jetzt nicht wirklich gut.

Zitat:

Zitat von Benmik (Beitrag 1422339)
Nachdem mich ein völlig unerklärlicher Bug eben völlig verrückt gemacht hat, habe ich ich bei einem Blick in Vcl.Controls gesehen, dass Delphi nach einem Doppelklick noch ein MouseDown anhängt.

Ja, tut es! Und zwar ganz bewusst mit einem [ssDouble] als ShiftState, damit man das auch im Eventhandler erkennen kann. Im OnMouseDown werden nämlich auch die Koordinaten mitgegeben, die im OnDblClick fehlen.


Alle Zeitangaben in WEZ +1. Es ist jetzt 04:00 Uhr.
Seite 1 von 2  1 2      

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz