Mehrere Tasten gleichzeitig abfragen...?!

[barnti]

Hi,

ich steh grad aufm Schlauch. Möchte bei Druck auf die Tasten 'Ctrl'+'Alt'+'F' Behandlungsroutine starten. Mein Code:

Delphi-Quellcode:

procedure TForm_Main.KeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
...
 if (Shift= [ssCtrl]) and (Shift= [ssAlt])and (char(Key)= char(70)) Then
        begin
          ShowMessage('Ctrl+Alt+F');
          exit;
        end;

Leider passiert nichts. Liegt der Fehler am falsch gewählten Event(KeyDown)? Wie kann ich das ändern, so dass ich bis 'Showmessage' komme. Danke!

Gruß,

Barnti