Текущий архив: 2006.12.17;
Скачать: CL | DM;
Вниз
Переопределить 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;
Скачать: CL | DM;
Память: 0.46 MB
Время: 0.045 c
