Tasten zuweisen

[kawumm]

Hallo.
Ich möchte einstellen das man mit ENTER auch durch die Edit Felder springen kann. Also ENTER = Tabulator.
Und dann möchte ich das F10 das selbe ist als wenn man auf Button X klickt.

Ich hab zwar die Sufu benutzt aber da ich nicht weiß wonach genau ich suchen muss blieb das erfolglos.

[theo]

Auf dem Formular Keypreview=true.
Dann in OnKeyDown des Formulars:

Code: Alles auswählen

uses LCLType;   
 
......
case Key of
  VK_RETURN: SelectNext(ActiveControl,true,true);
  VK_F10: Close;
  end;

[kawumm]

Danke. Das hilft schon mal weiter.

Das mit dem F10 hab ich wohl falsch erklärt. F10 soll nicht schließen sondern das selbe machen wie ein bestimmter Button. Also eine Prozedur ausführen. So das man das über Buttonklick oder F10 machen kann.

[Socke]

Dann musst du einfach Close durch den entsprechenden Event-Handler ersetzten oder den Button klicken:

Code: Alles auswählen

Button1.Click; // Button klicken
// oder
Button1OnClick(Button1); // den Event-Handler direkt aufrufen

[kawumm]

Ich hatte gehofft das es so einfach ist, aber nicht daran geglaubt.