Canvas del titulo de un DBGrid

[ecfisa]

Hola gandalf_uy.

Ancho real del título de una columna de un DBGrid:

...
var
  AnchoTitulo: Integer;
begin
   with DBGrid1.Columns[0] do 
     AnchoTitulo:=  Length(Title.Caption) * Canvas.TextHeight(Title.Caption); 
  ...
end;

Saludos.