Création d'un raccourci d'application Delphi sans élément de menu correspondant

Question

Je souhaite avoir une combinaison de touches de raccourci (comme Ctrl+Alt+D) dans mon application pour appeler une fonction, mais je ne veux pas que le raccourci apparaisse dans un menu.Est-il possible d'avoir un raccourci disponible dans votre application qui serait autrement invisible ?

Answer 1

vous pouvez utiliser le OnShortCut événement de la TApplicationEvents élément de cette tâche

vérifie ce code

procedure TForm1.ApplicationEvents1ShortCut(var Msg: TWMKey;
  var Handled: Boolean);
begin
  if (Msg.CharCode = Ord('D')) and (HiWord(Msg.KeyData) and KF_ALTDOWN <> 0) and  (GetKeyState(VK_CONTROL) < 0) then
  begin
    ShowMessage('Ctrl+Alt+D Pressed') ;
    Handled := true;
  end;
end;

Answer 2

Oui, c'est possible.Vous devez ajouter un objet de tact de classe à votre formulaire. Vous pouvez spécifier un raccourci clavier pour la taction, puis mettre votre code en événement OneXecute of the Taction.

Notez que vous ne pouvez pas ajouter de taction directement à votre formulaire, vous devez mettre une licence de tactone sur votre formulaire, puis vous pouvez ajouter une tacte à votre tictlist.