LOCAL sColWidths AS String sColWidths = "0," CLEAR CLOSE DATABASES ALL CREATE CURSOR Temp1; (ID N(4), Caption Character(50)) SELECT Temp1 sFontName = "MS Sans Serif" iFontSize = 8 FOR iColumn = 1 TO FCOUNT() iSize = TXTWIDTH(replicate('O',fsize(FIELD(iColumn))), sFontName, iFontSize) sColWidths = sColWidths + TRANSFORM(CEILING(iSize)) + "," ENDFOR ? sColWidths RETURN