Registriert seit: 10. Jun 2002
Ort: Unterhaching
11.412 Beiträge
Delphi 12 Athens
|
Re: Problem mit GetKeyNameText
11. Mai 2004, 09:42
Hier mal ein Beispiel:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
SC: TShortCut;
begin
SC := ShortCut( Ord('A'), [ssAlt] );
Edit1.Text := ShortCutToText( SC );
end;
... ...
Daniel Lizbeth Ich bin nicht zurück, ich tue nur so
|