Tab im Edit unterdrücken

[digleu]

Hi @ll,
besuche diese Seite schon eine Weile und habe schon sehr viele Anstöße und Ideen hierher bekommen, also großes Lob an alle dafür, dass es so eine effiziente und freundliche Delphi-Community im Netz gibt.

Nun zu meinem Anliegen:
Wie kann ich erreichen, dass man mit der Tabluator-Taste nicht mehr von einem Edit-Feld (z.B.) ins nächste springen kann? Das Problem ist nämlich, dass die Events OnKeyPress und OnKeyDown auf die Tabulator-Taste garnicht reagieren und ich somit sowas wie:

Code:

if Key = #9 then Key := #0 (bei OnKeyPress)

nicht machen kann. Das Event OnKeyUp reagiert zwar auf die Tab-Taste, allerdings ist es dann ja schon zu spät (der Fokus ist schon auf dem nächsten Control). Natürlich gibt es die Möglichkeit OnKeyUp

Code:

if Key = VK_TAB then PostMessage(Handle, WM_NextDlgCtl, 1, 0);

aufzurufen (um zum vorherigen Control zurückzuspringen), aber dann springt der Fokus immer so lustig im Formular rum, unschön anzusehen ...

also vielen Dank im Vorraus, Suche wurde natürlich genutzt, google auch und ich bin zu keinem adäquaten Ergebniss gekommen.

Viele Grüße
Lars