Показать сообщение отдельно
  #1  
Старый 11.07.2009, 17:16
Аватар для Oleg
Oleg Oleg вне форума
Активный
 
Регистрация: 29.11.2007
Адрес: Оренбургская обл., Россия
Сообщения: 261
Репутация: 15
Вопрос Вопрос о классах и наследовании...

Здравствуйте, подскажите пожалуйста как можно скрыть некоторые процедуры, функции и свойства выборочно при наследовании ?
например у нас есть класс:
type
Код:
 TClassFirst = class
 private
 FBol:Boolean;
 Function FGetTestProperty:Boolean; 
 Procedure FSetTestProperty(Val:Boolean);
public
 Property TestProperty:Boolean read FGetTestProperty write FSetTestProperty;
end;

 TClassSecond = class(TClassFirst)
 end;
например был у нас класс TClassFirst, мы от него наследовали новый класс TClassSecond и нам нужно, чтобы в нашем новом классе например не было такого свойства как TestProperty..
так же ещё как можно скрыть функции, процедуры, которые доступны всем, т.е. которые находятся в public и свойства в published.
Подскажите пожалуйста...
__________________
Если Вы находите ошибки, исправить которые дело долгое и нудное, ничего не делайте - просто внесите их в список особенностей
Ответить с цитированием