Delphi 2.0 StringGrid Problem

In Delphi 1.X, I make my column width the size of the heading using the
following code:

sg.cells[1,0] := 'Run Minimized';
sg.ColWidths[1] := sg.canvas.TextWidth(sg.cells[1,0]);

In Delphi 2.0, the column width is coming up too narrow. Any comments?

Thanks,
Rick

Rick Kramer
Software Consultant
Intergraph Corporation
Interoperability Products
rlkramer@.ingr.com