HI,
ich habe jetzt eine andere Lösung, nur gibt es dabei noch ein Problem, siehe Anhang:
Delphi-Quellcode:
procedure TForm1.EditHotkeyKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);
var
TempShortCut: TShortCut;
begin
TempShortCut:=ShortCut(Key, shift);
EditHotkey.Text:=ShortCutToText(TempShortCut);
end;
Warum stehe bei einem Druck auf die STRG-Taste STRG 2 mal da und einmal davon klein?
Gruß
Mazel