ein-tasten-shortcut, aber wie ?

[stiggi]

Code:

procedure TForm1.FormShortCut(var Msg: TWMKey;
  var Handled: Boolean);
begin
   if Msg.CharCode = VK_F2 then 
      begin
        Handled := true;
        MessageDlg('F2 Taste reagiert', mtConfirmation, [mbOK], 0);
      end;
end;

schau einfach mal in der Onlinehilfe nach FormShortCut