Namen der virtuellen Tastencodes

[Mazel]

Ich habe so eben mitbekommen, dass es eine Komponente names Hotkey auf dem Reiter Win32 (Delphi 6) gibt, die all das macht was ich brauche. Warum habe ich das nicht früher bemerkt, dann hätten wir uns die ganze Arbeit sparen können .

Dadurch hat sich nun fast alles erledigt. Nun habe ich noch ein kleines Problem: Ich habe in einer ListView die Hotkeys stehen, die sollen nun durch diese Komponente geändert werden, was ich über TextToShortCut und ShortCutToText mache. Wenn ich auf einen Eintrag in der ListView klicke, soll der Hotkey in die Hotkey Komponente eingetragen werden, das Problem ist aber, dass er mit den falschen Hotky zurück liefert:

Delphi-Quellcode:

// beim Klick auf den Eintrag
procedure TForm7.ListViewClick(Sender: TObject);
begin
 EditAction.Text:=ListView.Selected.Caption;
 EditHotkey.HotKey:=TextToShortCut(ListView.Selected.SubItems[0]);
end;

Wenn STRG + ALT + EINFG im Eintrag steht, wird mir STRG + ALT + 0 (ZEHNERTASTATUR) zurück geliefert, wo ist mein Fehler?

Gruß
Mazel