Hallo
wie kann ich überprüfen ob eine Taste ohne Tastenkombination gedrückt wurde ?
Die Pfeil-Rechts Taste soll 2 Funktionen tun
Wenn die Taste alleine gedrückt wird
Und ein mal, wenn die Taste mit Ctrl zusammen gedrückt werden
ssCtrl not in Shift
Delphi-Quellcode:
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if(Key =39)then
begin
ShowMessage('Pfeil rechts nur'); // !!!
end;
if((ssCtrl in Shift) and (Key =39))then
begin
ShowMessage('Ctrl + Pfeil rechts'); // OK
end;
end;
Ich have versucht mit dem Code aber wird nicht angenommen
Delphi-Quellcode:
if((ssCtrl not in Shift) and (Key =39))then // Fehler hier "not in" wird nicht angenommen
begin
ShowMessage('Pfeil rechts nur'); // !!!
end;