Delphiは - Altキー+ Cキーの押下を検出するTApplicationEventsにOnShortCutイベントを使用します
質問
私はDelphiのプログラムでアプリケーションのキーボードショートカットを取得するためにイベントOnShortCut TApplicationEventsを使用しています。
次のコードを使用します:
procedure TForm1.ApplicationEvents1ShortCut(var Msg: TWMKey; var Handled: Boolean) ;
begin
if (Msg.CharCode = VK_F9) then
begin
ShowMessage('F9 pressed!') ;
Handled := True;
end;
end;
質問:
どのように私は 'ALTのC' が押されたときを検出できますか?
解決
これと同様ます:
procedure TForm1.ApplicationEvents1ShortCut(var Msg: TWMKey;
var Handled: Boolean);
begin
if (Msg.CharCode = Ord('C'))
and (HiWord(Msg.KeyData) and KF_ALTDOWN <> 0)
then begin
ShowMessage('Alt+C pressed!') ;
Handled := TRUE;
end;
end;
システムがこれらのメニュー項目やダイアログコントロールをアクティブにするために使用して、Altキーを使用して、いくつかのキーが唯一のショートカットの悪い選択であることに注意してください。
他のヒント
それとも、彼らは他の人の前にショートカットを食べる、シンプルにTActionを作成することができます。
所属していません StackOverflow