ショートカットキーにテンキーを指定する方法
|
98 |
ShortcutKeyNumpad |
動作確認 |
Delphi2007 |
更新日 |
2010/06/24(木) |
ShortCutKeyにテンキーを指定したくても
オブジェクトインスペクタでは設定出来ないようです
TextToShortCut / ShortCutToText という関数は
一般キーとテンキーを区別しないし困りものです。
というわけで、
設定方法を調べてみました
ShortCutプロパティに仮想キーを割り当てるのがよいようです。
────────────────────
procedure TForm1.Button3Click(Sender: TObject);
begin
TenKeyAction1.ShortCut := VK_NUMPAD1;
TenKeyAction2.ShortCut := VK_NUMPAD2;
NormalKeyAction1.ShortCut := Word('1');
NormalKeyAction2.ShortCut := Word('2');
end;
────────────────────
これで上から順に
テンキーの『1』『2』
一般キーの『1』『2』
をショートカットキーとして登録することが出来ます。
|