ショートカットキーにテンキーを指定する方法
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』
をショートカットキーとして登録することが出来ます。