Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

DBGrid и скроллер (мышиный) [D5, MS Access]


Yagovdik ©   (2004-10-05 15:31:00) 

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

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


Yagovdik   (2004-10-05 16:07:00) [1]

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


asp   (2004-10-05 15:44:00) [2]

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


sniknik   (2004-10-05 15:44:00) [3]

> отучить
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 15:40:00) [4]

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


asp   (2004-10-05 15:36:00) [5]

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


Наверх

Титульная страница Поиск, карта сайта Написать письмо