Erstmal schön wieder hier zu sein, so meine Frage: Ich möchte mit einer OnKeyDown Prozedur die Shift Taste abfangen mein Code sieht folgendermaßen aus:
ein Syntaxfehler liegt nicht vor aber es paasiert einfach nichts, wo liegt der fehler?Code:procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState); begin if (Shift=[ssshift]) then begin ShiftTaste:=True; ShowMessage('funzt'); end; end;