delphi - TActionList の Action に新しいプロパティを追加する

Question

Delphi の TActionList のアクションに、新しく公開された (オブジェクト インスペクタに表示される) プロパティを追加するにはどうすればよいですか?

プロパティのデータ型はブールです。

ありがとう。

Answer 1

から派生させて、新しいアクション クラスを作成しますTAction。例えば：

TMyAction = class(TAction)
...
published
  property MyBoolProp: Boolean ....
end;

Registerそして、 を呼び出して、設計時パッケージのプロシージャから登録できますRegisterActions。

procedure Register;
begin
  .... // register any other components
  RegisterActions('MyCategory', [TMyAction], nil);
end;

次に、アクション リスト エディタから を選択するNew Standard Actionと、使用可能なアクションのツリー ビューにアクションが表示されます。

---

TActionコメントでは、新しいプロパティを持つように変更したいことを暗示しているようです。これには VCL 自体を変更する必要があり、それは制御できません。VCL をハッキングして目的を達成できることは間違いありませんが、それは良い考えではありません。