So zum Beispiel:
Delphi-Quellcode:
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if (key = vk_f1) and (shift = [ssCTRL,ssALT] ) then showmessage('CTRL-ALT-F1 würde gedrückt');
if (key = vk_f1) and (shift = [ssALT] ) then showmessage('ALT-F1 würde gedrückt');
if (key = vk_f1) and (shift = [] ) then showmessage('nur F1 würde gedrückt');
end;
Zitat:
hmm, finde da leider nix, kann mir mal einer helfen?
Also ich finde das ziemlich viel. Da gibt es sogar ein Beispiel, sowie die Auflistung der virtuellen Tastencodes.
Zitat:
Das Ereignis OnKeyDown tritt auf, wenn der Benutzer eine Taste drückt, während das Steuerelement den Fokus hat.
type
TKeyEvent = procedure (Sender: TObject; var Key: Word; Shift: TShiftState) of object;
property OnKeyDown: TKeyEvent;
Beschreibung
Mit einer Ereignisbehandlungsroutine für OnKeyDown können Sie spezielle Aktionen definieren, die beim Drücken einer Taste durch den Benutzer erfolgen sollen. Die Ereignisbehandlungsroutine für OnKeyDown kann auf alle Tasten sowie Kombinationen mit Umschalt, Alt und Strg und auf gedrückte Maustasten antworten.
Der Typ TKeyEvent zeigt auf eine Methode, die Tastaturereignisse verarbeitet.
Der Parameter Key bezeichnet die Taste auf der Tastatur. Verwenden Sie für nicht alphanumerische Tasten die virtuellen Tastencodes, um die gedrückte Taste zu bezeichnen. Weitere Informationen finden Sie unter Virtuelle Tastencodes.
Der Parameter Shift gibt an, ob auch die Tasten Umschalt, Alt oder Strg gedrückt wurden.