Как из фокса вставить во Word строку юникода? Метод Range.InsertAfter вставляет только обычный текст.
Если это невозможно, то хотя бы RTF строку как вставить?

Я понимаю, что вопрос не совсем актуален для России, где все на русском языке. А вот в ближнем зарубежье, где стоит, как правило русский Windows и нужно вести поддержку еще местного языка в базе данных, проблема начинает быть актуальной. Хорошо, что в последних версиях фокса появилось свойство FontCharSet для объектов формы. Это в некоторой степени спасает. С нетерпением жду когда же фокс будет юникод поддерживать полноценно, Но, видимо, не очень-то Майкрософт спешит с этим. Не хотят от dbf формата они отходить.
И все-таки, возвращаясь к нашим баранам...

oBasic=CREATEOBJECT("Word.Basic")
oBasic.appshow
oBasic.filenewdefault
oBasic.Insert(strconv("Текст",1))

Не работает такая конструкция!

Не работает.

Лень с АПИ разбираться и форматами буфера обмена...

Сделал так:

В документе Ворда делаю маленький макрос:

Sub InsertText(cString As Variant)
ThisDocument.Application.ActiveDocument.Range.InsertAfter(StrConv(cString, vbFromUnicode))
End Sub

А потом из фокса вызываю его вот так:

oWord=CREATEOBJECT("Word.Application")
oWord.Application.Visible=.t.
oWord.Application.Documents.Open("Test.doc")
oWord.Application.Run("InsertText",STRCONV("Текст тут",5,1049))

Где 1049 - это LocaleID национального алфавита.