Hallo,
ich will in einer Memo-Komponente eine Tastenkombination einbauen bei der dann etwas passieren soll. Meine Idee war es im OnKeyDown-Ereignis die Eingaben abzufangen und Nachzuschauen ob die Shifttaste gedrückt ist und Enter betätigt wird. Das Attribut Shift in diesem Ereignis ist vom Typ TShiftState welches ein set ist. Meine Abfrage sieht so aus:
Delphi-Quellcode:
procedure TFProgramm.MEingabeKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if not Shift=[ssShift] then
if Key=13 then BButtonClick(nil);
end;
Der Compiler meldet mir dann:
Zitat von
Compiler:
[Fehler] UProgramm.pas(503): Operator ist auf diesen Operandentyp nicht anwendbar
[Fataler Fehler] programm.dpr(17): Verwendete
Unit 'UProgramm.pas' kann nicht compiliert werden
Wo liegt mein Fehler? Gibt es eventuell sogar einen eleganteren Weg?