Здравствуйте, ekamaloff, Вы писали:
E>Здравствуйте, Denis_TST, Вы писали:
E>>>Получается, что можно только "повышать" область видимости?
D_T>>Ты можешь его "спрятать" объявив такое же, но пустое. Правда, до предыдущего все равно можно будет добраться через привдение типов.
E>Не помогает это, написано же в первом сообщении.

Я плохо обяснил, сорри. Имелось ввиду что-то вроде этого:
type
TBase = class
private
FMember: Integer;
public
property Member: Integer read FMember;
end;
TDerived = class(TBase)
function GetMemeber:integer;
public
property Member:integer reag GetMemeber;
end;
function TDerived.GetMemeber:integer;
begin
raise Exception.Create(...);
end;
Обратится к свойству из предка будет нельзя.
... << RSDN@Home 1.2.0 alpha rev. 622>>