ShortCut für Edit-Feld

[Tiny Bartels]

Moin moin,

wie kann ich einem Edit-Feld eine Tastenkombination zuweisen? Bei z. B. Alt + S soll der Curser auf ein bestimmtes Feld springen.

Danke für Eure Hilfe

Gruß Tiny

[Bine]

<pre>procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if (shift = ([ssAlt])) then edit1.setfocus;
end;
</pre>

Das wäre ein Beispiel für Alt Taste leider weiß ich nicht wie die kombination von ALT+S geht!

Aber vielleicht hilft dir das weiter!!
BINE :

[Tiny Bartels]

Moin nochmal,

Entwarnung! Ich habe es inzwischen von allein lösen können. Mit der ActionList Komponente.

Wichtig für Neulinge wie mich:
1. ActionList Komponente einfügen
2. Mit Doppelklick auf die Komponente den Action Editor öffnen
3. Action Komponente im Editor anlegen und den ShortCut zuweisen
4. Mit dem Ereignis OnExecute kann dann z. B. der Focus auf das Edit-Feld gesetzt werden.

Gruß Tin

[Karsten Gehm]

Oder einfacher: Meistens steht ja ein Label davor, als Bezeichnung, wenn man dort zum Bleistift statt Name einfach &Name als Caption setzt erscheint das N unterstrichen, dann muss man nur noch FocusControl des Labels auf das gewünschte Edit setzen fertig