Eliminar scroll horizontal (que no scrollbar) de dbgrid

[[coso]]

vaya vaya cachondeandose del projimo eh??? pues q se sepa q lo lograre...

[[coso]]

...espero...

[[coso]]

...y si no mira, que usen el scrollbar que para eso esta

[roman]

A ver si con esto:

Código Delphi [-]
type
  TDBGrid = class(DBGrids.TDBGrid);

...

var
  LeftCol: Integer;

begin
  LeftCol := TDBGrid(DBGrid1).LeftCol;

  ...

  TDBGrid(DBGrid1).LeftCol := LeftCol;
end;

// Saludos

[[coso]]

Si, eso era...lastima del flick (en onexit se coge el valor, en onenter se vuelve a poner). Pruebo de repintar y les cuento Merci Roman

[[coso]]

Bueno...parece q la solucion al final si es sencilla, aunque no tenga mucha logica...es poniendo simplemente dbgrid.Options - [dgRowSelect] antes de repintar...no hace falta ni canviar .leftcol. Parece ser que si dgRowSelect esta activado al llegar al .paint, se crea el bitmap de toda la dbgrid y luego este se mueve a la columna especificada, con el correspondiente parpadeo en fin, gracias

[roman]

Hombre, pues sí, esto ya lo había notado. Pero como lo preguntabas, suponía yo que no tenías esa opción habilitada. El punto es sí deseas activar esa opción tan sólo para resolver el otro problema.

// Saludos