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

Реакция компонента на события.   Найти похожие ветки 

 
sashas ©   (2003-04-03 14:40) [0]

Help All!!!

Я написал компонент который как форма меняет свои границю при перетаскивании их мышью (на основе TPaintBox). Соответственно пришлось определить его OnPaint,OnMouseDown ... Но ведь если при использовании компонента я создам обработчики на это, то все перестанет работать. Как решить эти поблемы попроще?


 
MBo ©   (2003-04-03 14:47) [1]

Почему перестанет?
В DoMouseDown, например, пишешь

какой-то код (возможно, inherited вызываешь)
потом
If Assigned (FOnMouseDown) then
FOnMouseDown(Self);


 
sashas ©   (2003-04-03 14:50) [2]

А что есть DoMouseDown ?


 
Юрий Зотов ©   (2003-04-03 15:06) [3]

> Я написал компонент...
> Соответственно пришлось определить его OnPaint, OnMouseDown

Значит, Вы написали ПРОГРАММУ (или что угодно другое), но только не КОМПОНЕНТ. Потому что ТАК компоненты не пишут (по той самой причине, о которой Вы сами и сказали).


> А что есть DoMouseDown?

Метод диспетчеризации события OnMouseDown. Его Вам и надо было заместить, а не "определить OnMouseDown". Вот именно ТАК компоненты и пишут. Детали см. в исходниках VCL.


 
MBo ©   (2003-04-03 15:10) [4]

обычно обработчики событий вызываются из динамического метода таким образом. Для TControl - из метода DoMouseDown вызывается MouseDown, из которого, в свою очередь, FOnMouseDown, если он существует



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

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



Память: 0.45 MB
Время: 0.012 c
1-67390
anbezr
2003-04-10 14:15
2003.04.21
TForm1 = class(TMyForm) - в Object inspector не видно свойств


7-67565
Mnch
2003-02-27 15:14
2003.04.21
Dos-прога не работает с COM-портом под Win98


14-67494
Delpher_Gray
2003-04-03 15:02
2003.04.21
Не могу решить проблему...


3-67153
Денис
2003-04-03 11:54
2003.04.21
Забавная ошибка


6-67407
Reals
2003-02-25 19:46
2003.04.21
Клиент новостей (NNTP). Как читать русский текст (кирилицу).




   Наверх