DBGrid и скроллер (мышиный)

← →
Yagovdik (2004-10-05 15:31) [0]

Подсобите!
Как отучить сетку реагировать на перемещение колеса мыши, которое вызывает перемещение курсора активной ячейки, но не текучей записи набора данных?

При этом, если я поверну скроллер и нажму Ф2, вместо значения под курсором подставляется значение соответствующего поля ТЕКУЩЕЙ ЗАПИСИ и редактируется оно, а не то, которое находится под курсором...
С уважением Александр Яговдик

← →
asp © (2004-10-05 15:36) [1]

Определить методы DoMouseWheelDown & DoMouseWheelUp

← →
Yagovdik (2004-10-05 15:40) [2]

для этого необходимо создать дочерний класс?
если у Вас есть кусок похожего коду, будьте любезны...

← →
asp © (2004-10-05 15:44) [3]

Если тяжело создавать дочерний класс, воспользуйся библиотекой RX. Тебе подойдет RxDBGrid.

> отучить
TMyDBGrid = class(TDBGrid); TForm1 = class(TForm) DBGrid1: TMyDBGrid; ... procedure MouseWheel(Sender: TObject; Shift: TShiftState; WheelDelta: Integer; MousePos: TPoint; var Handled: Boolean); end; procedure TForm1.MouseWheel(Sender: TObject; Shift: TShiftState; WheelDelta: Integer; MousePos: TPoint; var Handled: Boolean); begin Handled:= true; end; procedure TForm1.FormCreate(Sender: TObject); begin DBGrid1.OnMouseWheel:= MouseWheel; end;

← →
Yagovdik (2004-10-05 16:07) [5]

Огромное вам СПАСИБО.
Как это я про RxLib забыл...

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