Eliminar scroll horizontal (que no scrollbar) de dbgrid

[[coso]]

Hola a todos,
tengo una dgrid que se extiende bastante horizontalmente. Me gustaria que al refrescar los datos (recolocando el cursor en el registro anterior) la dbgrid no hiciese el scroll horizontal al respecto. Supongo que se podria capturar el mensaje de scroll (¿alguien sabe su nombre? ¿o una lista de los mensajes que procesa dbgrid?) y ejecutar tansolo el vertical...en fin, si alguien tiene alguna idea, gracias por adelantado. Saludos.

[[cHackAll]]

Aunque no soy afecto del uso de componentes y no "se" que ·"%$ te refieres me concentro en la pregunta: WM_HSCROLL, si es que por ahí va el asunto me atreveria a intentar con:

Código Delphi [-]
 ShowScrollBar(dbGrid1.Handle, SB_HORZ, False);

Saludos

[[coso]]

Hola chackall,
no, la barra de scroll si que la requiero. Me intento explicar mejor: tengo 16 campos, de longitud considerable. Si el usuario esta mirando el campo 11, por ejemplo, no se ven ni el 1 ni el 2 etc, estando el scrollbar horizontal por la mitad de la barra...clickando se edita...al hacer un refresh de los datos y consecuentemente del dbgrid, el dbgrid vuelve a mostrar los campos 1,2,3 etc...y el scrollbar horizontal al inicio de la barra. Vamos, que lo que quiero es eliminar el scroll horizontal, dejando la scrollbar visible...de todas maneras, pruebo de capturar WM_HSCROLL y anular cualquier accion justo despues del refresh, a ver si resuelvo algo saludos y gracias.

[[coso]]

Gracias chackall...solucionado, mas sencillo todavia. Desconocia SetScrollPos y GetScrollPos

Código Delphi [-]
procedure T_main.dbCLIColExit(Sender: TObject);
begin
        tag := GetScrollPos((sender as TDBGrid).Handle,SB_HORZ);
end;
procedure T_main.dbCLIColEnter(Sender: TObject);
begin
        SetScrollPos((sender as TDBGrid).Handle,SB_HORZ,tag,TRUE);
end;

[[coso]]

No, no era eso ...

[[enecumene]]

Empezado por coso

No, no era eso ...

, perdón amigo, pero eso me acaba de dar risa , perdón

Saludos.