Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.06.06;
Скачать: CL | DM;

Вниз

OnMouseMove по ScrollBar y ListBox a.   Найти похожие ветки 

 
Дельфятник   (2002-05-28 13:00) [0]

Можно ли как-нибудь отловить то, что мышь съехала с области, где отображаются данные, и наехала на SсrollBar (у меня только вертикальный)?


 
KilkennyCat ©   (2002-05-28 13:12) [1]

Легко.
procedure TForm1.ListBox1MouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer);
begin
if y > ListBox1.Width - ListBox1.ScrollWidth then НАЕЗД! елзе ложная тревога;
end;


 
Дельфятник   (2002-05-28 14:24) [2]

В Delphi5 у компонента TListBox нет свойства ScrollWidth. Вы в 6-ом работаете? Кроме того, проблема состоит в том, что когда мышь наезжает на полосу прокрутки TListBox"a, то событие OnMouseMove перестаёт срабатывать в принципе.


 
Игорь Шевченко ©   (2002-05-28 14:30) [3]

SetCapture/ReleaseCapture - тогда выезд мыши за клиентскую часть можно будет поймать.


 
Дельфятник   (2002-05-28 15:06) [4]

Большое спасибо!



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

Текущий архив: 2002.06.06;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.009 c
1-18059
LP
2002-05-25 14:25
2002.06.06
глобальная переменная


1-17990
CHIMUMBARO
2002-05-23 20:37
2002.06.06
Люди! Срочно нужна помощь...


1-17977
Дельфятник
2002-05-28 13:00
2002.06.06
OnMouseMove по ScrollBar y ListBox a.


1-18027
VID
2002-05-24 11:34
2002.06.06
Что-то непонятное с INI-файлами...


1-17915
AL2002
2002-05-27 16:49
2002.06.06
Реестр. Добавление строковых параметров