Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2006.07.23;
Скачать: [xml.tar.bz2];

Вниз

Прокрутка мышью за пределами контрола   Найти похожие ветки 

 
Alextp ©   (2006-06-08 19:25) [0]

Хочу сделать в компоненте прокрутку как в RichEdit: при нажатии-утаскивании мыши за пределы контрола вверх или вниз он автоматически прокручивается.
Пока сделал так: в OnMouseMove проверяется

if Y<0 then ScrollUp;
if Y>ClientHeight then ScrollDown;

но работает не очень. Мышь приходится постоянно двигать, иначе MouseMove не вызывается. Как сделать более правильно?


 
han_malign ©   (2006-06-09 12:57) [1]

По таймеру проверяешь, что мышь находится "за краем" в допустимых пределах и прокурчиваешь...


 
Alextp ©   (2006-06-09 16:29) [2]

Сделал через таймер, все работает.

Другой вопрос: как выставить параметры "Интервал таймера" и "Число прокруч. строк за один раз", чтобы было как в RichEdit?

Пока выставил: 150, 1. Прокручивается очень медленно.


 
han_malign ©   (2006-06-09 17:09) [3]


> как выставить параметры "Интервал таймера" и "Число прокруч.  строк за один раз"

- интервал таймера - экспериментально, а "скорость прокрутки"(Ч.С.) - можно вычислять по расстоянию мыши от "края", зависимость - тоже экспериментально подобрать...


 
Zz_   (2006-06-09 17:11) [4]

SetCapture ?



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

Форум: "Основная";
Текущий архив: 2006.07.23;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.013 c
2-1151744556
kernel
2006-07-01 13:02
2006.07.23
Раскладка клавы


15-1151307292
worldmen
2006-06-26 11:34
2006.07.23
Excel. Программно окрасить ячейки.


15-1151147411
mio
2006-06-24 15:10
2006.07.23
Закрытие программы.


15-1151159758
TUser
2006-06-24 18:35
2006.07.23
Земля, Солнце и астрономия


2-1152036071
Geonew
2006-07-04 22:01
2006.07.23
Таблица





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский