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

Вниз

Вопрос есть! Попытка номер 2.   Найти похожие ветки 

 
MAN-IN-RED   (2002-01-27 23:11) [0]

Второй раз задаю этот вопрос, пожалуйста помогите.
Как программно посмотреть нажата ли левая кнопка мыши на компоненте TrackBar или нет?
Что-то вроде этого:
if кнопка нажата then

else

end.
Заранее благодарен!


 
Alx2 ©   (2002-01-28 08:13) [1]

Подскажу только как сделать доступным метод OnMouseDown, который будет вызываться при нажатии кнопок мышки на trackbar;

TMyTrack = class (ttrackBar)
property OnMouseDown;
end;

.....

procedure TForm1.FormCreate(Sender: TObject);
begin
TMyTrack(TrackBar1).OnMouseDown := TrackMouseDown;
end;

.........

procedure TForm1.TrackMouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
begin
// Что-то делаем, если Button=mbLeft
end;



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

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

Наверх




Память: 0.46 MB
Время: 0.008 c
1-32183
Mitrofan
2002-01-25 11:39
2002.02.11
Как синхронно скролировать два Memo or ListBox a


4-32380
Don
2001-12-12 18:36
2002.02.11
Определение длины строки при выводе ссобщения в rectangle


7-32359
SergeyDonetsk
2001-11-05 16:53
2002.02.11
Как можно заставить модем снять трубку?


3-32132
chelobaka
2002-01-15 16:37
2002.02.11
Как избежать появления окна с запросом на ввод имени и пароля


1-32227
Wizard
2002-01-26 15:28
2002.02.11
DCOM/ATL