Doppelklick in MouseDown erkennen (MouseDown vs. DblClick)

[Schokohase]

Ok, ich war da eben nicht ganz korrekt mit meiner Antwort.

Ein Click ist wie folgt deklariert: Ein WM_LBUTTONDOWN und WM_LBUTTONUP Nachricht muss innerhalb der Grenzen eines Controls erfolgen. Die Zeitspanne zwischen WM_LBUTTONDOWN und WM_LBUTTONUP ist unerheblich (können auch mehrere Stunden sein, wenn man keinen Krampf im Finger bekommt).

Ein DoubleClick ist da schon etwas anderes. Das Betriebssystem selber erkennt den DoubkeClick und sendet dann eine WM_LBUTTONDBLCLK Nachricht. Auslöser dafür ist das erneute drücken der Maustaste innerhalb eines bestimmten Zeitraums innerhalb bestimmter Grenzen (einstellbar im Betriebssystem).

Für jeden DoppelKlick erhält man also folgende Nachrichten:

Code:

WM_LBUTTONDOWN -> WM_LBUTTONUP -> WM_LBUTTONDBLCLK -> WM_LBUTTONUP

Das System sendet nun also anstatt einer simplen WM_LBUTTONDOWN eine WM_LBUTTONDBLCLK Nachricht (aufgepasst, die Maus-Taste ist noch gedrückt) und wenn die Taste losgelassen wird wie gehabt eine WM_LBUTTONUP Nachricht.

Delphi-Spezifisch

In Delphi selber kann man sich darauf verlassen, dass es zu einem

Delphi-Quellcode:

MouseUp

Event auch ein

Delphi-Quellcode:

MouseDown

Event gegeben hat (diese tauchen also zeitlich getrennt immer paarweise auf). Darum wird in Delphi auch der

Delphi-Quellcode:

MouseDown

Event bei der Nachricht WM_LBUTTONDBLCLK ausgelöst, denn sonst würde bei einem DoppelKlick dieser Paarlogik gebrochen.

Es geht auch anders

Bei Microsoft und WinForms, da wird der

Delphi-Quellcode:

Click

und

Delphi-Quellcode:

DoubleClick

Event erst bei

Delphi-Quellcode:

MouseUp

ausgelöst. Allerdings bekommt man hier nun ein etwas anderes Verhalten bei einem Doppelklick.

So kann man hier einen

Delphi-Quellcode:

DoubleClick

wie den

Delphi-Quellcode:

Click

herauszögern oder sogar verhindern, wenn man beim zweiten Drücken die Taste festhält und dann eine beliebige Zeitspann wartet und dann irgendwann die Maustaste löst.

[Benmik]

Zitat:

Zitat von Uwe Raabe (Beitrag 1422353)

Finde ich jetzt nicht wirklich gut.

Naja, ich kam hierher durch eine Suche. Der Titel passt perfekt zu dem, was ich suchte, so dass andere auch genau hier landen werden. Ich hätte künstlich einen anderen Titel vergeben müssen, dann hätten alle zwei Themen durchgehen müssen.

Natürlich war mir klar, dass sich Borland seinerzeit etwas dabei gedacht hat. Die Erklärung von Schokohase habe ich dann beim zweiten Durchlesen begriffen.

In all den Jahren war ich fest der Überzeugung, dass die Reihenfolge so ist:

Delphi-Quellcode:

WM_LBUTTONDOWN -> WM_LBUTTONUP -> WM_LBUTTONCLK -> WM_LBUTTONDBLCLK

. Soso, WM_LBUTTONCLK gibt es gar nicht. Und der Doppelklick kommt vom Betriebssystem. Jetzt verdrehen hier alle alten Hasen die Augen, aber ich bin mir völlig sicher, dass so mancher stiller Mitleser ebenso platt ist wie ich.

Also: Bei jedem MouseDown aufpassen, wenn es auch noch ein DblClick gibt. Der Tipp von Uwe mit

Delphi-Quellcode:

(ssDouble in Shift)

ist dabei sehr nützlich. Das ist ja ein Minenfeld hier.

[Schokohase]

Es steht aber so geschrieben

Zitat:

Double-clicking the left mouse button actually generates a sequence of four messages: WM_LBUTTONDOWN, WM_LBUTTONUP, WM_LBUTTONDBLCLK, and WM_LBUTTONUP.

Es ist also mehr eine Frage ob man die Dokumentation gelesen hat.

[Benmik]

Aber klar ist es das. Und ganz bestimmt habe ich nicht alle Dokumentation über alles gelesen. Das haben die Profis aber immer wieder auch nicht, wie man hier unschwer mitlesen kann. Die über solche grundlegenden Dinge wie Mausereignisse aber vermutlich schon. Schön für die Profis. Sie wären aber vermutlich nicht mehr lange Profis, wenn sie es nicht täten.

Übrigens hätte mir das Studium der Dokumentation hier auch nur bedingt geholfen. Denn am Ende der Sequenz kommt bei Windos WM_LBUTTONUP, bei Delphi aber MouseDown. Egal, wieder was gelernt.

[Schokohase]

Der Hinweis auf die Dokumentation soll ja auch nur die Verwunderung bremsen, weil es eben kein geheimes Wissen ist. Mehr nicht.

Warum Delphi den MouseDown Event feuert habe ich auch erläutert und ja, wenn man mit Delphi für Windows programmiert, dann muss man sich mit Delphi und Windows auseinandersetzen. Da sollte jetzt aber nicht neu sein. Da die Dokumentation von Delphi teilweise schwach bis gar nicht vorhanden ist, muss man dort auch mal in den Source schauen (soweit es möglich ist).

[Benmik]

"Verwunderung" ist ja eine freundliche Umschreibung ...

Der Hobbyprogrammierer unterscheidet sich ja vom Profi (unter anderem) darin, dass er nicht alles von der Pike auf lernt, sondern in der Regel nur das, was er gerade braucht (oder zu brauchen glaubt). Das bringt Lücken mit sich, die dem Profi die Haare zu Berge stehen lassen.

Das Problem hier bestand darin, dass ich gar nicht auf die Idee kam, meine Vorstellung vom Ablauf eines Doppelklicks zu hinterfragen (so wie auch hier geschehen). Selbst wenn, dann hätte ich ohne dieses Forum die Hintergründe niemals so schnell erfahren. Das ist ja die erstaunliche Stärke der Delphi-Praxis, dass sich hier gestandene Experten nicht zu schade sind, ihre Zeit (und ihre Haare, die sie sich dauernd raufen) Anfängern zu widmen.

Natürlich ist es auch schön, wenn man mal den Platz auf der anderen Seite der Schulbank einnehmen kann. Und da verwundert es nicht, dass es hier strenge pädagogische Prinzipien gibt, und zwar noch von der guten alten Art. Ein ehernes lautet: Eigenleistung! Das Kind bekommt nichts fertig vorgesetzt, es soll sich selber anstrengen! Wenig hat mich so erheitert wie dieser Sketch, in dem gestandene Erwachsene um die Generation Z herumtanzen (ideales Subjekt für eine psychologische Seminararbeit: DieDolly). Man muss KetchUp aber auch für seine Bierruhe und sein Durchhaltevermögen bewundern. Wie sehr man aber der eigenen Sphäre verhaftet ist, das sieht man unter anderem (nur ein Beispiel!) an diesem Kommentar. Es ging um ein Schulprojekt! Jetzt bin ich über die Phase von Schulprojekten hinaus, aber ich bin mir sicher, dass man sich noch öfter über meine Lücken wird wundern müssen. Ich werde nie mit Delphi mein Brot verdienen - morgen fängt mein RL wieder an!