Форум: "Базы";
Текущий архив: 2003.09.04;
Скачать: [xml.tar.bz2];
ВнизНавигация в DBGrid Найти похожие ветки
← →
Сергей77 (2003-08-14 09:14) [0]Нет события MouseWheel. Сетка на колесико вроде реагирует, перерисовывает ячейки, но курсор остается на месте, перемещается только стрелками на клавиатуре и на одну строку щелчком мыши. Что бы курсор перемещался колесиком надо вручную писать обработчик сообщений windows, и дорабатывать исходник DBGrid?
Может кто работал в D7, как там организовано DBGrid на колесо реагирует, может мне просто найти себе D7. ??
← →
stud (2003-08-14 09:19) [1]поставь себе ehlib для d7 и ни о чем не думай))
← →
sniknik (2003-08-14 10:19) [2]> Может кто работал в D7, как там организовано DBGrid на колесо реагирует...
там то же самое. делается легко (юзай dbgreed и можеш немного подумать ;о))
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;
Страницы: 1 вся ветка
Форум: "Базы";
Текущий архив: 2003.09.04;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.011 c