Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 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
14-82414
michael
2003-09-08 14:51
2003.09.25
Порекомендуйте книгу по VC++ для начинающих но желающих стать пр


6-82363
clim
2003-07-23 00:20
2003.09.25
connect function


4-82565
Сергеич
2003-07-25 08:38
2003.09.25
Данные из другой программы


8-82346
super_alex
2003-05-26 13:42
2003.09.25
Мигает TImage? Что делать?


3-82147
АлеКс
2003-09-03 04:13
2003.09.25
Не срабатывают события TADOQuery





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский