Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

DBGrid и прокрутка мышью


студент2002 ©   (2002-10-17 18:49:00) 

Ребята, подскажите как отключить колесо при работе с DBGrid?


Pat   (2002-10-21 01:46:00) [1]

Перевожу на "русский" язык:

if Msg.message=WM_MOUSEWHEEL then
begin
Msg.message:=WM_KEYDOWN;
if Msg.wParam>0
then Msg.wParam:=vk_up
else Msg.wParam:=vk_down;
end;

Второе, думаю, понятно без слов :-)))


BobRus   (2002-10-20 21:57:00) [2]

Просто поставте на форму компонент TApplication и в обработчике событий OnMessage поместите код

if Msg.message=522 then begin
Msg.message:=256;
if Msg.wParam>0 then Msg.wParam:=38
else Msg.wParam:=40;
end;

если требуется корректная работа работа колесика
или

if Msg.message=522 then begin
Msg.message:=0;
end;
для его отключения


студент2002   (2002-10-18 16:50:00) [3]


> А зачем Вам это?
> Обычно хотят чтобы скрол работал?


Я полагаю, что сделать, чтобы он не работал проще. ;)


Кулюкин Олег   (2002-10-18 10:00:00) [4]

2 студент2002 (17.10.02 18:49)
Посмотрите исходники RxDBGrid, как там обрабатываются сообщения от колеса.
ЛИбо напишите свой наследник стандартного грида, и самостоятельно гасите сообщения, либо перехватывайте сообщения грида.

А зачем Вам это?
Обычно хотят чтобы скрол работал?


Leran2002   (2002-10-18 08:41:00) [5]

Хирургическим методом: Разбераем мыша, удаляем у него колесо...


студент2002   (2002-10-18 07:14:00) [6]

up


Наверх

Титульная страница Поиск, карта сайта Написать письмо