Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.08.22;
Скачать: CL | DM;

Вниз

help   Найти похожие ветки 

 
Groove   (2002-08-11 15:21) [0]

Скажите мне, люди, программисты, и прочие, можно сделать для компонента процедуру, которой у него нету???
Например, в trackbar1 нету процедуры OnMouseUp и OnMouseDown,а они нужны!! Help, Help


 
Anatoly Podgoretsky ©   (2002-08-11 17:05) [1]

Если исходники есть то можно, иначе новый компонент.


 
Юрий Зотов ©   (2002-08-11 17:09) [2]

Вообще говоря, в таких случаях пишется компонент-потомок. А в данном случае все вообще легко - эти события есть в TControl, их надо просто опубликовать.

type
TMyTrackBar = class(TTrackBar)
published
property OnMouseDown;
property OnMouseUp;
end;

procedure Register;

implementation

procedure Register;
begin
RegisterComponents("Samples", [TMyTrackBar])
end;


 
Groove   (2002-08-11 19:14) [3]

Что-то не выходит =(
Кинь пример на ящик, если не тяжело?!!?!?! =))


 
Groove   (2002-08-11 19:54) [4]

У МЕНЯ ПОЛУЧИЛОСЬ!!!
Я РОДИЛ =))))))))



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

Текущий архив: 2002.08.22;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.016 c
1-71076
Сережа
2002-08-12 11:13
2002.08.22
Удаление автозагрузки из реестра


14-71377
Viewer
2002-07-26 15:47
2002.08.22
Насколько реален выпуск Pentium 5 до конца этого года.


1-71233
V.Turecky
2002-08-11 15:11
2002.08.22
Наложение изображения на другое изображение...


14-71375
Извращенец
2002-07-28 20:24
2002.08.22
PrintScreen


4-71451
Transnet.
2002-06-14 12:35
2002.08.22
Кaк вырубить, а потом снова врубить мышь???