Entwickler-Ecke

Sonstiges (Delphi) - Tastencode TShortCut umwandeln in Text (STRG + ALT + F1)


HRNICKEL - Sa 20.11.10 12:49
Titel: Tastencode TShortCut umwandeln in Text (STRG + ALT + F1)
Hallo

ich brauche eine Funktion wie


Delphi-Quelltext
1:
2:
3:
4:
5:
6:
function GetKeyText(nKey:Integer):String;
Begin
  case nKey of
  49264 : Result := 'STRG + ALT + F1';
  49265 : Result := 'STRG + ALT + F2';
end;


Gibt es da was fertiges ?

Moderiert von user profile iconMartok: Delphi-Tags eingefügt


Martok - Sa 20.11.10 18:49

Hi,

Delphi kennt dafür ShortCutToText (Unit Menus). Wie man den KeyCode in ein TShortCut umwandelt, sollte sich auch finden lassen. Wenn nicht, muss man sich das halt selber bauen, aber da gehts ja nur darum, den ShiftState rauszusieben.

Grüße,
Martok