Форум: "Базы";
Текущий архив: 2003.12.30;
Скачать: [xml.tar.bz2];
ВнизПоведайте про решение проблемы с несоответствием скроллбара! Найти похожие ветки
← →
Aleksandr (2003-12-04 14:44) [0]Знаю, что есть классический пример, как заставить в DBGrid отображать бегунки на скроллбарах в точном соответствии с нахождением курсора в наборе данных. Только вот найти не могу никак его :(...
← →
sniknik (2003-12-04 14:55) [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;
← →
dmtr (2003-12-04 15:01) [2]DataSet.FetchAll
← →
sniknik (2003-12-04 16:05) [3]у вот про что, а я почемуто подумал про маркер когда колесиком прокручиваеш. тоже позиция сходит с реального курсора в датасете.
Страницы: 1 вся ветка
Форум: "Базы";
Текущий архив: 2003.12.30;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.008 c