Форум: "Основная";
Текущий архив: 2003.09.25;
Скачать: [xml.tar.bz2];
ВнизTrackBar? Найти похожие ветки
← →
Юрий Ж. (2003-09-12 22:23) [0]Как определить что значение TrackBar"а (Position) было изменено путем перетаскивания мышкой, а не присвоением например:
TrackBar1.Porition:=25; ????
Плиз ХЕЛП!
← →
Lexa (2003-09-12 22:37) [1]Чтобы видеть значение TrackBar1.position в любой момент на форме создадим метку и создадим процедуру у TrackBar1 в которой присвоем значение TrackBar1.Porition метки вот так: procedure TForm1.TrackBar1.Porition:=25; Change(Sender: TObject);
begin
Label1.Caption:=IntToStr(TrackBar1.Position);
end;
← →
Sam Stone (2003-09-12 23:09) [2]2 Юрий Ж.
Лови мышку через, например, событие OnMouseUp, т.е., если оно произошло, то юзверь трогал трэкбар мышой
← →
mrcat (2003-09-12 23:32) [3]Юрий Ж. (12.09.03 22:23)
А смысл какой ? Нельзя по точнее определить задачу ?
← →
Юрий Ж. (2003-09-13 09:05) [4]2 Sam Stone
А как ловить мышь, там нет ни MouseMove, ни MouseDown и т.д.?
← →
Тохус (2003-09-13 10:33) [5]2 Юрий Ж.
Для того, чтобы передвинуть трекбар мышкой нужно обязательно нажать на ней клавишу. Соответственно, генерирунтся событие onMouseDown. Создаем для этого события флаг, и как только оно происходит, присваиваем ему значение true. А когда происходит событие onMouseUp возвращаем флагу false. Правда остается маленькая вероятность, что юзер нажал на кнопку мыши в другом месте, а значение трекбара поменялось программно. Это тоже можно отследить, так как упомянутые события возвращают координаты мыши на форме.
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2003.09.25;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.01 c