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

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

DBGrid [D6, Paradox]

b-a-n ©   (2004-07-02 10:31:00) 

Как зделать так, чтобы при вращении колесика мышки над DBGrid выполнялись команды Table.Next и Table.Prior, а не просто перемещение курсора по таблице?

---

sniknik   (2004-07-02 12:01:00) [1]

можно переопределить
TMyDBGrid = class(TDBGrid)
 procedure WMMouseWheel(var Msg: TWMMouseWheel); message WM_MOUSEWHEEL;
end;

в гриде, и там делать реакцию

procedure TMyDBGrid.WMMouseWheel(var Msg: TWMMouseWheel);
begin
 if DataSource.DataSet.Active then begin
   if Msg.WheelDelta > 10 then DataSource.DataSet.Prior;
   if Msg.WheelDelta < -10 then DataSource.DataSet.Next;
 end;
end;

переопределять, или делать наследника от грида и описывать или подменить процедуру в существующем гриде (это нужно onMouseWheel заменить)

---

Sir John   (2004-07-02 10:44:00) [2]

ответ:всем
>> У меня и курсор и индикатор перемещаются при вращении
>> колесика мышки (специально ничего не делал)

у меня - тоже самое.. Курсор вместе с индикатором бегают...

---

Vlad   (2004-07-02 10:42:00) [3]

> b-a-n ©   (02.07.04 10:40) [2]

Драйвер для мыши нормальный поставь.
У меня и курсор и индикатор перемещаются при вращении колесика мышки (специально ничего не делал)

---

b-a-n   (2004-07-02 10:40:00) [4]

Разница в том, что при вращении колесика просто двигается курсор, выделяющий запись в DBGrid, а индикатор остается на тойже записи Table.

---

Sir John   (2004-07-02 10:33:00) [5]

а в чем разница, поясните?
Насколько я понимаю, "перемещение курсора по таблице" колесиком мышки и есть Next и Prior

---

Наверх