смотрите, сделала так
Код:
var par:OLEVariant;
begin
WordApplication1.Connect;
WordDocument1.ConnectTo(WordApplication1.Documents.Add
(EmptyParam,EmptyParam,EmptyParam,EmptyParam));
WordApplication1.selection.InsertAfter(mResults.Lines[1]);
par:=ExtractFilePath(Application.ExeName)+'out.doc';
WordDocument1.SaveAs(par);
WordDocument1.Close;
WordDocument1.Disconnect;
WordApplication1.Quit;
WordApplication1.Disconnect;
MessageDlg('вывод отчета завершен',mtInformation,[mbOK],0)
end; ошибок не выдает, запускается но в документ out ничего не сохраняется, или может я неправильно делаю? я документ out создала заранее, он сидит ждет когда же в него запишут что надо