para las columnas del dbgrid

[jhcaboverde]

puse la funcion y la llamo desde el evento de create del form, mi duda es en el nombre de la funcion pones "TFrmQuick" que es esto?? no entiendo bien y no puedo modificarla para llevarla a lo que necesito.
errores que me da:

[Error] Unit1.pas(102): Function needs result type
[Error] Unit1.pas(107): Undeclared identifier: 'Canvas'
[Error] Unit1.pas(107): Undeclared identifier: 'QRLabel1'
[Error] Unit1.pas(108): Not enough actual parameters

te detallo mas mi duda: tengo un DBGrid, adotable y un datasource que pasa al abrir el form las columnas toman el ancho "que les da la gana" quiero que mediante un codigo tomen el tamano segun el nombre de la columna, es decir, que el tamano sea ancho del nombre de la columna.

no utilizo la propiedad ancho de columna del dbgrid como otros me han sujerido porque cambian de nombre.

un saludo y gracias por la atencion

kico