Вниз
Скачать: CL | DM;

Как переопределить событие?   Найти похожие ветки 

 
yurikon03   (2003-04-03 09:20) [0]

Например в компоненте наследнике от TTreeView при возникновении события OnChange выполнялся сначала мой код, а потом тот, который указан в Inspector`е?


 
Skier ©   (2003-04-03 09:22) [1]

Перекрой в наследнике метод Change
procedure TCustomTreeView.Change(Node: TTreeNode); dynamic;


 
yurikon03   (2003-04-03 09:39) [2]

>> Перекрой в наследнике метод Change
>> procedure TCustomTreeView.Change(Node: TTreeNode); dynamic;
А dynamic обязательно указывать?


 
Skier ©   (2003-04-03 09:44) [3]

>yurikon03
1)Без обид, но (!) - ПОЧИТАЙ КНИГИ.
2) объявление в наследнике
TYourTreeView = class(...)
protected
Change(Node: TTreeNode); override;
//..................
end; //TYourTreeView

реализация в наследнике
TYourTreeView.Change(Node: TTreeNode);
begin
//your code goes here...
end;


 
Михаил Баринов   (2003-04-03 09:48) [4]

Насчет книг - согласен с Skier ©. :)
По-моему в последнем примере нужно добавить inherited.
Он вызывает родительскую реализацию перекрытого метода.
override - просто убирает предупреждение, что метод наследника закрывает метод родителя.


 
Skier ©   (2003-04-03 09:53) [5]

>Михаил Баринов

> По-моему в последнем примере нужно добавить inherited

С учётом того что автор вопроса хочет "вызывать" "код, который указан в Inspector`е?", то - ДА.

А в общем случае всё зависит от того что требуется от перекрытого
метода.


 
yurikon03   (2003-04-03 09:54) [6]

>Skier ©
Без обид :-)



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.016 c
1-44151
lex01
2003-04-03 15:36
2003.04.14
Delphi потоки


3-44041
Roman_kv
2003-03-22 15:23
2003.04.14
CheckBox в DBGrid


7-44462
sachem
2003-02-18 11:07
2003.04.14
Как заблокировать клавиатуру?


1-44255
Бульбаш
2003-04-02 10:40
2003.04.14
Как правильно осуществить переход между полями ввода (Edit)


3-44007
vlgrig1961
2003-03-25 13:40
2003.04.14
Есть что-либо похожее на Refresh в TQuery




   Наверх