Текущий архив: 2002.06.06;
Скачать: CL | DM;

Вниз

Помогите с компонентом   Найти похожие ветки 

← →
Ferrarium ©   (2002-05-24 09:19) [0]

Мастера помогите!
Как у своего компонента активировать 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;

---

← →
MBo ©   (2002-05-24 09:22) [1]

просто написать его в разделе public или published

---

← →
Кулюкин Олег ©   (2002-05-24 09:24) [2]

TМой Компонент = Class(TКомпонент Делфи)
public (или published)
property НужноеПроперти;
end;

Активировать?
Интересная формулировка.
Если хотите, чтобы оно отображалось в инспекторе, то переносим его в секцию published.

---

← →
Ferrarium ©   (2002-05-24 09:46) [3]

Спасибо, заработало.

А как не создовая своего компонента обратиться к property предка?

---

← →
Lusha ©   (2002-05-24 10:24) [4]

type
TМой Компонент = Class(TКомпонент Делфи);

Использование

TМой Компонент(Объект типа ТКомпонент Делфи).Нужное Проперти...

---

Страницы: 1 вся ветка

Текущий архив: 2002.06.06;
Скачать: CL | DM;

Наверх

Память: 0.47 MB
Время: 0.029 c