Hi John,

>nTLen = SendMessage_C(THISFORM.Title_Olecontrol1.hWnd, 1119, REPLICATE(CHR(0),8), 0)

For me it returns the same value as LEN(oRTFControl.Text) but try changing it to:

nTLen = SendMessage_C(THISFORM.Title_Olecontrol1.hWnd, 1119, CHR(2)+REPLICATE(CHR(0),7), 0)

This sets the GTL_PRECISE flag. Maybe this will be more "precise" :^)