Por favor haz la siguiente prueba en Harbour y xHarbour con el RTF que te falla:
local cRTF := MemoRead( "tu_rtf.rtf" )
MemoWrit( "harbour.rtf", cRTF )
y para xharbour:
MemoWrit( "xharbour.rtf", cRTF )
y ahora compara a nivel binario (puedes usar UEStudio, o un editor similar) ambos ficheros harbour.rtf y xharbour.rtf y localiza las diferencias, o comprueba que sean iguales.