Как добавить новое опубликованное (для отображения в инспекторе объектов) свойство в действие TActionList в Delphi
тип данных свойства - логический.
Спасибо.
Как добавить новое опубликованное (для отображения в инспекторе объектов) свойство в действие TActionList в Delphi
тип данных свойства - логический.
Спасибо.
Создайте свой новый класс действий, производный от TAction
. Например:
TMyAction = class(TAction)
...
published
property MyBoolProp: Boolean ....
end;
А затем вы можете зарегистрировать его из Register
процедуры вашего пакета времени разработки, вызвав _4 _.
procedure Register;
begin
.... // register any other components
RegisterActions('MyCategory', [TMyAction], nil);
end;
Затем в редакторе списка действий выберите New Standard Action
, и ваше действие отобразится в древовидной структуре доступных действий.
В комментариях вы, кажется, подразумеваете, что хотите изменить TAction
, чтобы получить новое свойство. Это потребует модификации самого VCL, а это вне вашего контроля. Без сомнения, VCL можно взломать, чтобы добиться того, о чем вы просите, но это плохая идея.
got that
: -)
- person TLama; 01.08.2012