Ajustar columnas en dbgrid

[ingabraham]

no pues, gracias x la ayuda.
les pregunto por que no tengo idea como podria hacerlo.

[Casimiro Noteví]

Empezado por ingabraham

uno de esto lo hace pero tomando como referencia la longitud del tamanno del nombre del campo

Te puede servir ese que comentas, en lugar del nombre del campo debes escoger el dato que se va a presentar. Y repetir el proceso por cada columna.
Puede ser engorroso, pero no hay otra opción, tienes que comprobar por cada columna para encontrar la que tiene más anchura, no te queda otra.

[juanlaplata]

este codigo ajusta el ancho de la colunma de un DBGrid a el maximo entre la cantidad de letras del titulo y de la cantidad de letras del dato de la primier fila y columna correspondiente.
Lo q no quita q mas abajo el ancho de columna deba cambiar .
Para eso, deberias calcular 1ro, cual sera el ancho max para cada columna, con el costo q eso trae ..

Código Delphi [-]
for i:= 0 to Grilla.Columns.Count-1 do
    begin
    Grilla.Columns[i].Title.Alignment:= taCenter;
    Grilla.Columns[i].Width :=
          Max((Grilla.Canvas.TextWidth(Grilla.Columns[i].Field.AsString)+20),
              (Grilla.Canvas.TextWidth(Grilla.Columns[i].Title.Caption)+10))
               ;
    end;