新的屬性添加到行動中TActionList

Question

我怎麼能新出版（中對象檢查中顯示）屬性添加到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可能會被黑客實現你所要求的，但這不是一個好主意。