PDA

Просмотр полной версии : Горизонтальная прокрутка в rxDBGrid...



GOS
20.09.2004, 10:05
В rxDBGrid, в Options выбран RowSelect(те выбирается сразу строка).

Есть необходимость по нажатию курсоров <- и -> скролировать сетку как мышкой. Есть ли возможность это сделать?

С уважением, Олег!

Naeel Maqsudov
21.09.2004, 08:29
Это просто. Странно, что Rx-ы этого не предусмотрели...


procedure TForm1.RxDBGrid1KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
case key of
VK_LEFT: begin
sendmessage(RxDBGrid1.Handle,WM_HSCROLL,SB_LINELEF T,0);
Key:=0;
end;
VK_RIGHT: begin
sendmessage(RxDBGrid1.Handle,WM_HSCROLL,SB_LINERIG HT,0);
Key:=0;
end;
end;
end;

GOS
21.09.2004, 11:43
Спасибо! Я о сообщениях как-то не подумал...