>Fred,
>
>Here's what I'm doing to test all this:
>
>
>cTestVal = "Client"
>cFontName = "Arial"
>nFontSize = 9
>nWidth = CEILING(FONTMETRIC(6, cFontName, cFontSize) * TXTWIDTH(cTestVal, cFontName, cFontSize))
>
>_Screen.AddObject("MyText", "Textbox")
>_Screen.MyText.Width = nWidth
>_Screen.MyText.FontName = cFontName
>_Screen.MyText.FontSize = cFontSize
>_Screen.MyText.Value = cTestVal
>_Screen.MyText.Visible = .T.
>>
>The word 'Client' is truncated in the visible portion of the text box
You'll need to allow for border size, etc. (extra space). The .Width property is NOT the visible space. The visible space would be the .Width - 2*border + couple for good measure. :)