Key in ComboBox

[thomas2009]

Hallo

wie kann ich keys wie F1, F2 oder wie VK_LEFT in ComboBox eingeben ?
Mit Buchstaben und Zahlen wie 0,1,2, A,B,C funktioniert :

Delphi-Quellcode:

...
key := Ord(Combobox1.Items[Combobox1.ItemIndex][1]);

[sx2008]

Das geht nicht, da es im Windows Zeichensatz diese Tastencodes nicht gibt.
Aber es gibt die Komponente THotKey (Auf Seite "Win32") mit der man Tastendrücke wie z.B. Shift-F12 aufzeichnen kann.
Diesen Hotkey kann man dann z.B. einer Action zuweisen.

[thomas2009]

Es gibt aber bestimmt ein Trick
schaue hier, wo einige Programme den Combobox verwenden:
http://www.smartsoundrecorder.com/onlinehelp/hotkey.png

[Luckie]

Das werden ganz normale Eingaben sein wie: "[F1]".

[Satty67]

Evtl. so lösen:

Delphi-Quellcode:

  if Combobox1.Items[Combobox1.ItemIndex] = '[ LINKS ]' then key := vk_Left;

[thomas2009]

Zitat:

Zitat von Luckie

Das werden ganz normale Eingaben sein wie: "[F1]".

Ich habe gerade in ComboBox den Wert [F1] eingegeben und getestet aber es funktioniert nicht

[Meflin]

Zitat:

Zitat von thomas2009

Ich habe gerade in ComboBox den Wert [F1] eingegeben und getestet aber es funktioniert nicht

Bei dir? Nein, natürlich funktioniert das nicht. dazu müsstest du ja erst noch die Funktionalität ergänzen...

[DeddyH]

Was hast Du wo wie eingegeben und was funktioniert nicht?

[Luckie]

Was willst du denn eingeben? Bei deinem Beispiel dient die Combobox der Auswahl.

[Satty67]

Vielleicht wird es deutlicher, wenn ich seine Code-Zeile mit rein nehmen:

Delphi-Quellcode:

// Hier Spezialtasten auswerten
if Combobox1.Items[Combobox1.ItemIndex] = '[F1]' then key := vk_F1
  // ansonsten normale Zeichen
  else key := Ord(Combobox1.Items[Combobox1.ItemIndex][1]);