Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

как получить доступ к протектед... [D7]


vasek ©   (2005-12-02 03:18:00) 

как получить доступ к протектед свойству/методу извне класса или его потомков?


Набережных С.   (2005-12-02 08:11:00) [1]


> Джо ©   (02.12.05 03:45) [1]


Достаточно так:
THackBaseClass = class (TSomeClass);


Джо   (2005-12-02 03:45:00) [2]

свойство:
Исходный класс:

 TSomeClass = class
 private
   FSomeProperty: Integer;
 protected
   property SomeProperty: Integer read FSomeProperty write FSomeProperty;
 end;

Создаем потомка и выносим свойство в паблик:

 THackBaseClass = class (TSomeClass)
 public
   property SomeProperty;
 end;

Применяем typecast:

var
 ProtectedClass: TSomeClass;
...
 THackBaseClass(ProtectedClass).SomeProperty := 10;

---
Про методы - не уточнен тип метода: virtual или нет.


Наверх

Титульная страница Поиск, карта сайта Написать письмо