LT>>Вообще-то, положено именно так.
E>Плохо значит, что так положено. Глупость какая-то.
Угу, а почему в самолете стоп-крана нету? Глупость какая-то!
Ну как ты скроешь свойство, если любой класс — это и любой из его родителей?
Об этом, кстати, в справке, кажется, написано
Зачем тебе эта иллюзия непонятно чего?.
TObject -> TParent -> TChild
var Child : TChild;
(**** skip ***)
procedure DoSomething(AnyObject: TParent);
begin
ShowMessage(AnyObject.MyHiddenProperty);
end;
(**** skip ***)
Child.MyHiddenProperty := '12345'; //Ошибка! Нет такого свойства
DoSomething(Child); //И всё-таки оно еcть!
ShowMessage(Child.MyHiddenProperty); // Ложку видишь? А нету её!
Вот такой бред тебе нужен? Не, нафиг такое!