![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Прокрутка мышью за пределами контрола
Alextp © (2006-06-08 19:25:00)Хочу сделать в компоненте прокрутку как в RichEdit: при нажатии-утаскивании мыши за пределы контрола вверх или вниз он автоматически прокручивается.
Пока сделал так: в OnMouseMove проверяется
if Y<0 then ScrollUp;
if Y>ClientHeight then ScrollDown;
но работает не очень. Мышь приходится постоянно двигать, иначе MouseMove не вызывается. Как сделать более правильно?
Zz_ (2006-06-09 17:11:00) [1]SetCapture ?
han_malign (2006-06-09 17:09:00) [2]
> как выставить параметры "Интервал таймера" и "Число прокруч. строк за один раз"
- интервал таймера - экспериментально, а "скорость прокрутки"(Ч.С.) - можно вычислять по расстоянию мыши от "края", зависимость - тоже экспериментально подобрать...
Alextp (2006-06-09 16:29:00) [3]Сделал через таймер, все работает.
Другой вопрос: как выставить параметры "Интервал таймера" и "Число прокруч. строк за один раз", чтобы было как в RichEdit?
Пока выставил: 150, 1. Прокручивается очень медленно.
han_malign (2006-06-09 12:57:00) [4]По таймерупроверяешь, что мышь находится "за краем" в допустимых пределах и прокурчиваешь...