Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Базы данных и репортинг > DBGrid который на

Автор: Foley 27.2.2006, 23:16

Как мне сделать чтоб данные в ДБ Гриде прокручивались колесиком мышки? (те которые на экране прокручиваются, а дальше нет)...

Автор: Kesh 27.2.2006, 23:50

Foley, поясни...

Автор: Foley 28.2.2006, 00:45

ну Эксель открой, покрути колесиком мышки вверх-вниз, прокручивается, а в гриде не прокручивается...(натипа MouseWheelUp, MouseWheelDown) стрелками перемещается, а колесиком нет.

Автор: Vas 28.2.2006, 07:58

Возьми DBGridEh это самый простой вариант.

А для DBGrid вот, с MoveBy сам разберешься, может наоборот знаки поставить придется:

Код


...
  private
    { Private declarations }
    procedure MWHandler(var Msg: TMsg; var Handled: Boolean);
...

Procedure TForm1.FormCreate(Sender: TObject);
Begin
  Application.OnMessage:=MWHandler;
End;

//процедура прокрутки DBGird мышью
Procedure TForm1.MWHandler(var Msg:TMsg; var Handled:Boolean);
Begin
  if Msg.message=WM_MOUSEWHEEL then
    begin
      if(FindControl(Msg.hwnd)<>nil) and (FindControl(Msg.hwnd).ClassName='TDBGrid') and (FindControl(Msg.hwnd).Focused) then
        begin
          if Msg.wParam>0 then
            TDBGrid(FindControl(Msg.hwnd)).DataSource.DataSet.MoveBy(-1) 
          else
            TDBGrid(FindControl(Msg.hwnd)).DataSource.Dataset.MoveBy(1);
          Msg.message:=0;
        end;
    end;
End;

Автор: bas 28.2.2006, 10:15

Цитата(Vas @ 28.2.2006, 07:58

)

Возьми DBGridEh это самый простой вариант

Cамый простой вариант это использовать GredWheel где параметр WheelDelta отвечает куда (вверх ,вниз) прокрутили колесо
Добавлено @ 10:19
http://kavlad.h15.ru/delphi/advice_5_dbgrid_mouse.html

Автор: Vas 28.2.2006, 10:46

Цитата(bas @ 28.2.2006, 10:15

)

Cамый простой вариант это использовать GredWheel где параметр WheelDelta отвечает куда (вверх ,вниз) прокрутили колесо

Может быть, спорить не буду, но DBgridEh предоставляет намного больше возможностей от которых порой становится трудно отказаться и перейти обратно на использование DBGrid smile

Автор: Foley 28.2.2006, 23:36

DBGridEh где взять такую компаненту?(кстати часто вижу компаненты с Eh где они находятся не подскажете?)

Автор: Foley 1.3.2006, 00:09

Все нашел я ентот эхлиб