Delphi + Word

[archerix]

Здравствуйте, народ.

Когда-то давно занимался этим делом - тогда были еще Дельфи 7 и Офис 2000, все прекрасно работало. Теперь вот попробовал вернуться к этой теме, мучаю Офис 2003 и ХЕ2. Чудеса какие-то происходят. Вот простенькая программка, которая просто открывает Ворд и делает там надпись.

procedure TForm1.Button7Click(Sender: TObject);
var vsave, vname: OleVariant;
begin
WordApplication1.ConnectKind:=ckNewInstance;
WordApplication1.Connect;
WordApplication1.Visible:=True;
WordApplication1.Documents.AddOld(EmptyParam, EmptyParam);
WordDocument1.ConnectTo(WordApplication1.ActiveDocument);

WordDocument1.Range.Text:='Hello, World!';

vname:='D:\testXE.doc';
//WordDocument1.SaveAs(	vname, EmptyParam, EmptyParam,
//         	            EmptyParam, EmptyParam, EmptyParam,
//                      EmptyParam, EmptyParam, EmptyParam,
//                      EmptyParam, EmptyParam );

//WordDocument1.Close;
WordDocument1.Disconnect;
WordApplication1.Disconnect;
end;

Документ открывается, надпись делается - а после начинаются непонятки. Я не могу сохранить полученный файл ни программно, ни даже вручную, через меню Ворда. Все время выдает ошибку. Кто-то сталкивался с таким?

[archerix]

Теперь вообще все вдруг заглохло Компоненты с панели пропали, полез в свойства проекта - не дает поставить галку ни для Офиса ХП, ни для 2к. А ругается почему-то про Access

[archerix]

Что, никто не интересуется этой темой? Ковыряюсь пока сам. Попробовал более новый Офис 2013 (стоял 2003), по крайней мере созданный программно документ можно сохранить вручную, уже прогресс Не понимаю - при попытке сохранить из программы вылетает сообщение, что методы Save и SaveAs "не поддерживаются сервером". Как такое может быть?


Удалось программно сохранить через стандартные компоненты, но только в папку Документы, в другое место не хочет