FormKeyPress durch ComboBox doppelten Aufruf verhindern

[Whookie]

Im konkreten Fall kommt es darauf an, aus welchem Kontext der Tastendruck erfolgt.

Ist das ComboBox-Edit-Control aktiv (z.B.: Style := cdDropDown ), wird der Tastendruck über TCustomCombo.ComboWndProc (WM_CHAR) empfangen. An dieser Stelle wird die DoKeyPress-Methode aufgerufen und darüber das OnKeyPress-Ereignis ausgelöst. Am Ende dieser Fensterprozedur (ComboWndProc) wird die Verarbeitung direkt an Windows übergeben (CallWindowProc).

Ist das ComboBox-Edit-Control nicht aktiv (z.B.: Style := csDropDownList ) dann wird der Tastendruck über TCustomCombo.WndProc (WM_CHAR) empfangen. Auch hier wird wieder das OnKeyPress-Ereignis ausgelöst. Am Ende der Fensterprozedur wird aber die Fensterprozedur des Vorgängers aufgerufen (inherited WndProc ) und dadurch dann TWinControl.WMChar ausgelöst, wodurch der zweite OnKeyPress - Aufruf erfolgt.

Verhindern kann man das nur indem man über Key := #0 die Verarbeitung der Taste als abgeschlossen markiert.

Je nachdem, was du erreichen willst ist Form.KeyPreview nicht die geeignete Methode, oft ist es vernünftiger TAction zu verwenden und dort einen Shortcut einzustellen...

[Nixsager]

Danke für die gute und ausführliche Erklärung, auch wenn ich sie nicht ganz verstanden habe.

Aber ein Paar Fragen habe ich noch.

1. Ist es nicht ein Fehler, das das OnKeyPress-Ereignis des Fensters von der ComboBox ausgeführt wird?
Die ComboBox hat doch selber das Ereignis.
Und das das OnKeyPress-Ereignis des Fensters ausgeführt wird ist ja kein Fehler, denn dafür habe ich ja die KeyPreview aktiviert.

Was ich noch herausgefunde habe:
Sind Einträge in der ComboBox vorhanden die mit dem Buchstaben der gedrückten Taste anfangen, wird das OnKeyPress-Ereignis des Fensters nicht ausgeführt.

2. Wieso verhindert Key := 0; die doppelte Ausführung?
Es ist ja wie ein spezielles Exit; .
Denn die Prozedur wird ja direkt verlassen.

3. Wo ist der Unterschied zwischen DoKeyPress und OnKeyPres?

[Whookie]

Grundsätzlich sind Windows-Controls auch nur (spezialisierte) Fenster, erhalten also direkt alle Botschaften vom System (Windows). Ein Tastendruck gehört da auch dazu und im Normalfall wird er auch vom Control direkt verarbeitet.

Damit das OnKeyPreview-Event überhaupt funktionieren kann, benachrichtigt also das Control (in deinem Fall die ComboBox) das Formular über das empfangene Zeichen. Dazu ruft die ComboBox ihre DoKeyPress-Methode auf und von hier aus wird das OnKeyPreview-Ereignis des Formulars aufgerufen. Setzt du darin Key := #0 bricht das Control bei der Rückkehr aus dem Event die Verarbeitung ab.

Damit stellt sich eigentlich nur die Frage, ob der zweifache Aufruf ein Bug ist und ich neige dazu das so zu sehen. Allerdings ist das ganze System komplex (viele verschiedene Funktionen benötigen die Information) und auf den ersten Blick ist das wohl nicht so einfach zu reparieren. Ich hab jetzt im Emba-Bugtracker nicht nachgesehen ob das verhalten bereits gemeldet wurde, man könnte das aber durchaus machen.

Zu 3:
DoKeyPress ist eine Methode (implementiert in TWinControl) die aufgerufen wird, wenn eine WM_CHAR - Botschaft empfangen wurde. Innerhalb von DoKeyPress wird entschieden ob das OnKeyPreview-Ereignis des Formulars auf dem das Control liegt ausgelöst werden muss/soll.