実行時にツールバーボタンにTActionを割り当てる方法は？

Question

設定ファイルに基づいてツールバーボタンを動的に追加します。私はそれらに感謝したいと思います。今のところOnClickイベントをAction OnExecuteハンドラで追加しましたが、アクションが無効になっていると、デザイン時に追加されたTMenuItemsなどのツールバーボタンは自動的に無効になりません。

つまり、私はIDEの "アクション"ドロップダウンメニューを使ってTActionを割り当てるデザインタイムのランタイムバージョンを持っていたいと思います。

ここまでは私がこれまで行ってきたことです（コードはC++ですが、それは明らかです）。

TToolButton *b; 
b = new TToolButton(ToolBar1); 
b->Action = Form1->ActionManager1->Actions[0]; 
b->Parent = ToolBar1; 

これは、ツールバーにボタンを追加すると、アクションが有効/無効の状態になるようですが、クリックすると何も起こりません。行動を適切かつ完全に追加するにはどうすればよいですか？

Answer 1

TToolButtonは、Actionプロパティを公開しています。目的のTActionオブジェクトをそのプロパティに割り当てるだけです。