Сокрытие свойств предка в наследнике

[VirtUX]

Как скрыть published свойство в наследуемом классе?
Например:

Код: Выделить всё

TMother = class(TComponent)
...
published
  property AnyProp: TAnyType read FAnyProp write SetAnyProp;
end;

TNewClass = class(TMother)
// убрать из видимости в "Инспекторе объектов" AnyProp, или вообще сделать его недоступным
end;


[Mr.Smart]

Ан, не получится...

[VirtUX]

Может есть какие-то обходные пути? В С++ есть такая возможность. Теплется надежда, что и в FPC можно как-то устроить...

[Mr.Smart]

Может в FPC, что и придумали, я компонентами не замарачиваюсь (не пишу давно уже со времён D7).

[VirtUX]

не пишу давно уже со времён D7

Я никогда не заморачивался с написанием компанент. Только простенькие на основе чужих в Делфях. Но недавно попробывал - и вкупил, какая это класная и удобная фича. Вот практикуюсь, переписывая старые проекты.
В одном вот - понадобилось скрыть свойство. Конечно - это не вкрай принципиально, но так было бы безопасней и красивее.

[Sergei I. Gorelkin]

В Object Pascal область видимости при наследовании может только расширяться. Уменьшать ее нельзя.
Из-за этого VCL/LCL имеют две параллельные иерархии TCustomXXX и TXXX, где основная функциональность содержится в TCustomXXX, а TXXX только публикует нужные свойства.