![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
OnMouseMove по ScrollBar y ListBox a. [D5, NT4, Win2k]
Дельфятник © (2002-05-28 13:00:00)Можно ли как-нибудь отловить то, что мышь съехала с области, где отображаются данные, и наехала на SсrollBar (у меня только вертикальный)?
Дельфятник (2002-05-28 15:06:00) [1]Большое спасибо!
Игорь Шевченко (2002-05-28 14:30:00) [2]SetCapture/ReleaseCapture - тогда выезд мыши за клиентскую часть можно будет поймать.
Дельфятник (2002-05-28 14:24:00) [3]В Delphi5 у компонента TListBox нет свойства ScrollWidth. Вы в 6-ом работаете? Кроме того, проблема состоит в том, что когда мышь наезжает на полосу прокрутки TListBox"a, то событие OnMouseMove перестаёт срабатывать в принципе.
KilkennyCat (2002-05-28 13:12:00) [4]Легко.
procedure TForm1.ListBox1MouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer);
begin
if y > ListBox1.Width - ListBox1.ScrollWidth then НАЕЗД! елзе ложная тревога;
end;