Скачать: CL | DM;

DBGrid   Найти похожие ветки 

← →
b-a-n ©   (2004-07-02 10:31) [0]

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

---

← →
Sir John ©   (2004-07-02 10:33) [1]

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

---

← →
b-a-n ©   (2004-07-02 10:40) [2]

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

---

← →
Vlad ©   (2004-07-02 10:42) [3]

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

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

---

← →
Sir John ©   (2004-07-02 10:44) [4]

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

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

---

← →
sniknik ©   (2004-07-02 12:01) [5]

можно переопределить
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 заменить)

---

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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.035 c