[Alegun]

Вопрос ведь про сохранение был, вот попробовал по примеру из базы знаний так

Код:

uses
ComObj;
...
WordApp := CreateOLEObject('Word.Application');
   if not VarIsEmpty(WordApp) then
   begin
     WordApp.Text:= 'ddddd';
     WordApp.FileSaveAs(Name := 'c:\temp.doc', Format := {11 от балды чтоб был 0} 0 );
     WordApp.AppClose;
     WordApp := Unassigned;
   end;

а оно и сохраняет