Форум: "Компоненты";
Текущий архив: 2006.12.17;
Скачать: [xml.tar.bz2];

Вниз

Переопределить OnClick у потомка TCustomControl?   Найти похожие ветки 

← →
DVM ©   (2006-04-19 13:48) [0]

Как это оформить в классе, че то никак не соображу.
У потомка должно остаться событие OnClick, но при клике он (потомок) должен выполнять некие действия до пользовательского обработчика OnClick.

---

← →
icWasya ©   (2006-04-19 14:08) [1]


type
 TMyControl = class(TCustomControl)
 ...........
 procedure Click; override;
 .........
 end;

...........
procedure TMyControl.Click;
begin
 // что - нибудь ДО
 inherited Click;
 // что - нибудь ПОСЛЕ
end;



---

← →
DVM ©   (2006-04-19 14:23) [2]

> icWasya ©   (19.04.06 14:08) [1]

Спасибо.

---

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

Форум: "Компоненты";
Текущий архив: 2006.12.17;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.44 MB
Время: 0.042 c