OnMouseUp on ScrollBar
Доброго времени суток!
На форме есть ScrollBar. При изменении позиции бегунка изменяется рисунок на форме. Нужно не перерисовывать канву при движении бегунка. Но как узнать, что пользователь отжал кнопку мышки, если событие OnMouseUp отсутствует для компонента ScrollBar?
Заранее спасибо!
На форме есть ScrollBar. При изменении позиции бегунка изменяется рисунок на форме. Нужно не перерисовывать канву при движении бегунка. Но как узнать, что пользователь отжал кнопку мышки, если событие OnMouseUp отсутствует для компонента ScrollBar?
Заранее спасибо!
Цитата: angel2c
Доброго времени суток!
На форме есть ScrollBar. При изменении позиции бегунка изменяется рисунок на форме. Нужно не перерисовывать канву при движении бегунка. Но как узнать, что пользователь отжал кнопку мышки, если событие OnMouseUp отсутствует для компонента ScrollBar?
Заранее спасибо!
На форме есть ScrollBar. При изменении позиции бегунка изменяется рисунок на форме. Нужно не перерисовывать канву при движении бегунка. Но как узнать, что пользователь отжал кнопку мышки, если событие OnMouseUp отсутствует для компонента ScrollBar?
Заранее спасибо!
TScrollBar::OnScroll ставишь там какой нибудь флаг и по нему смотришь, скролит ли пользователь или нет...
можно свой компонент написать - наследник, и там сделать обработчик WM_LBUTTONUP
Можно в TApplication::OnMessage ловить WM_LBUTTONUP, сравнивать на какой компонент оно пришо, если на ScrollBar, тогда делать обработку сообщения
конешно, желательно решить задачу первым предложенным способом. я так и планировал. но вот вопрос как раз в том, как посмотреть, скролит ли пользователь или нет...
отвечу всем на будущее:
для улавливания конца скроллинга нужно использовать событие OnScroll; когда промотка закончена, ScrollCode = scEndScroll.
ура мне))
для улавливания конца скроллинга нужно использовать событие OnScroll; когда промотка закончена, ScrollCode = scEndScroll.
ура мне))