Форум: "Начинающим";
Текущий архив: 2006.01.08;
Скачать: [xml.tar.bz2];

Вниз

DBGrid и колесико мыши   Найти похожие ветки 

← →
Дева ©   (2005-12-18 00:09) [0]

Доброго времени суток, мастера :)
Подскажите, пожалуйста, как подружить DBGrid и колесико мыши. Чтобы при прокручивании оного DBGrid листалось

---

← →
Virgo_Style ©   (2005-12-18 11:22) [1]

В OnCreate
TDrawGrid(DBGrid).OnMouseWheelDown:= FormMouseWheelDown;
TDrawGrid(DBGrid).OnMouseWheelUp:=   FormMouseWheelUp;

В Form.OnMouseWheelUp (..Down - аналогично c .Next)
if Sender is TDBGrid then
begin
 Handled:=true;
 (Sender as TDBGrid).DataSource.DataSet.Prior;
end;

---

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

Форум: "Начинающим";
Текущий архив: 2006.01.08;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.44 MB
Время: 0.008 c