Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.10.10;
Скачать: CL | DM;

Вниз

DBGrid скроллинг   Найти похожие ветки 

 
Pavel Denisov   (2002-09-18 10:42) [0]

Приветствую, уважаемые !

Не подскажет ли кто умную мысль, как мышиным колесом можно прокручивать записи в DBGrid вверх/вниз, в пределах экрана все работает, а вот когда нужно увидеть следующую запись то не работает. Источник данных DataSet, берет данные из ADOQuery.

Заранее благодарен.


 
sniknik ©   (2002-09-18 12:47) [1]

как вариант
делаеш тип
MyGreed = class(TDBGrid);

опиши события например
procedure TForm1.MouseWheelDown(Sender: TObject; Shift: TShiftState;
MousePos: TPoint; var Handled: Boolean);
begin
if Sender.ClassName = "TDBGrid" then ADODataSet1.Next;
end;

procedure TForm1.MouseWheelUp(Sender: TObject; Shift: TShiftState;
MousePos: TPoint; var Handled: Boolean);
begin
if Sender.ClassName = "TDBGrid" then ADODataSet1.Prior;
end;

при создании формы
MyGreed(DBGrid1).OnMouseWheelDown:= MouseWheelDown;
MyGreed(DBGrid1).OnMouseWheelUp:= MouseWheelUp;

в простейшем варианте будет работать, но с перерисовкой грида надо чтонибудь сделать (тут были примеры поищи)



 
MityaKost   (2002-09-18 12:50) [2]

есть вариант в rxLib ;) Там все это есть


 
Mike Kouzmine   (2002-09-18 14:38) [3]

А у меня и так работает, на стандарте.


 
sniknik ©   (2002-09-18 14:48) [4]

У тебя наверно родные мышиные драйвера стоят? нет?


 
Mike Kouzmine   (2002-09-18 14:55) [5]

Дома нет, на работе да, но работает и там, и там.


 
sniknik ©   (2002-09-18 15:26) [6]

а у меня перестало проворачивать грид после того как снес родные. но особо это меня не беспокоит :-)


 
Mike Kouzmine   (2002-09-18 15:30) [7]

А меня это никогда и не напрягало. Не вижу проблемы. Работает - слава Аллаху, не работает - ему же слава.



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

Текущий архив: 2002.10.10;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.027 c
3-31668
Шурик Ш
2002-09-20 12:34
2002.10.10
Не выходит создание Lookup-поля програмно


3-31647
Mr.BugiVugi
2002-09-18 01:18
2002.10.10
Trouble with Interbase


3-31610
Vint
2002-09-19 09:31
2002.10.10
Password под IB


1-31895
Manulo
2002-09-29 19:58
2002.10.10
Поиск...


14-31991
alexsandri
2002-09-16 21:31
2002.10.10
мужики даваи потрепимся на тему