Fórum Dbgrids scroll simultaneo #345686

Preciso fazer diferentes DBgrids rolarem na horizontal a partir do comando de um dbgrid básico.

Criei um evento onclic no dbgrid que localiza a coluna e move nos demais.Beleza.Funciona até com as setas de mover a direita e esquerda do teclado.

procedure tform1.dbgridclick(sender: tobject);
begin
pos :=dBGrid2.selectedIndex;
DBGrid3.SelectedIndex:=pos;
DBGrid4.SelectedIndex:=pos;
end;


O problema é que nada ocorre quando movo a barra de scrollbar horizontal do dbgrid.

Existe algum evento associado que possa ser criado e/ou utillizado?

Obrigado desde já