Как изменить свойство потомка?

← →
konstb (2003-03-14 13:50) [0]

Имеем: TControl у которого есть protected сво-во Caption. У многих его потомков это св-во переведено в published.
Надо: по некоторому алгоритму изменить это св-во.
Проблема: в том, что оно protected, т.е. хотелось бы как-то проверить то, что оно стало published и его изменить (ну, не перечислять же всех возможных потомков!!!)
Вопрос: как?

← →
MBo (2003-03-14 13:55) [1]

может, переформулируешь вопрос?
А получить доступ к этому свойству для потомков несложно:
TXControl=class(TControl);

...

TXControl(SomeControlAncestor).Caption:=...

← →
NAlexey (2003-03-14 13:56) [2]

Не понятно, тебе надо менять protected свойство или выяснить является ли свойство published? Если первое то доступ к protected -
type
TMyClass = class(TSomeClass);
procedure SomeProcedure;
begin
TMyClass(TSomeClass(...)).ProtectedProperty := ....;
end;
если второе, попробуй RTTI...

Как изменить свойство потомка? Найти похожие ветки