![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
help [D6, WinXP]
Groove © (2002-08-11 15:21:00)Скажите мне, люди, программисты, и прочие, можно сделать для компонента процедуру, которой у него нету???
Например, в trackbar1 нету процедуры OnMouseUp и OnMouseDown,а они нужны!! Help, Help
Groove (2002-08-11 19:54:00) [1]У МЕНЯ ПОЛУЧИЛОСЬ!!!
Я РОДИЛ =))))))))
Groove (2002-08-11 19:14:00) [2]Что-то не выходит =(
Кинь пример на ящик, если не тяжело?!!?!?! =))
Юрий Зотов (2002-08-11 17:09:00) [3]Вообще говоря, в таких случаях пишется компонент-потомок. А в данном случае все вообще легко - эти события есть в TControl, их надо просто опубликовать.
type
TMyTrackBar = class(TTrackBar)
published
property OnMouseDown;
property OnMouseUp;
end;
procedure Register;
implementation
procedure Register;
begin
RegisterComponents("Samples", [TMyTrackBar])
end;
Anatoly Podgoretsky (2002-08-11 17:05:00) [4]Если исходники есть то можно, иначе новый компонент.