![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Помогите с компонентом
Ferrarium © (2002-05-24 09:19:00)Мастера помогите!
Как у своего компонента активировать propetry описанное у предка предка в разделе protected
пример
TМой Компонент = Class(TКомпонент Делфи)
protected
property НужноеПроперти; <- как ативировать
end;
TКомпонент Делфи = Class(TCustomКомпонент Делфи)
end;
TCustomКомпонент Делфи= Class(TСontrol)
private
function GetНужноеПроперти(Index:LongInt):Integer;
procedure SetНужноеПроперти(Index:LongInt, Value:Integer)
protected
propery НужноеПроперти[Index:LongInt]:Integer read GetНужноеПроперти write GetНужноеПроперти;
end;
Lusha (2002-05-24 10:24:00) [1]type
TМой Компонент = Class(TКомпонент Делфи);
Использование
TМой Компонент(Объект типа ТКомпонент Делфи).Нужное Проперти...
Ferrarium (2002-05-24 09:46:00) [2]Спасибо, заработало.
А как не создовая своего компонента обратиться к property предка?
Кулюкин Олег (2002-05-24 09:24:00) [3]TМой Компонент = Class(TКомпонент Делфи)
public (или published)
property НужноеПроперти;
end;
Активировать?
Интересная формулировка.
Если хотите, чтобы оно отображалось в инспекторе, то переносим его в секцию published.
MBo (2002-05-24 09:22:00) [4]просто написать его в разделе public или published