![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
TWordApplication - save AS [Delphi, Windows]
mufan © (2005-08-13 19:59:00)Здравствуйте!
Мне надо было вставить в Word’овский документ в нужные места некоторую информацию. Хорошие люди здесь посоветовали записать макрос в ворде, а потом по нему делаь все в программе. Все хорошо получается!
Вот краткий код:
var
Word: TWordApplication;
W:OleVariant;
…
Word.connect;
W:=’doc.doc’;
Word.Documents.Open(w,EmptyParam,…..,EmptyParam);
…
различные действия
…
word.documents.save(EmptyParam, EmptyParam);
word.disconnect;
Но приword.documents.save(EmptyParam, EmptyParam);все изменения сохраняются в шаблон.
Можно ли сделать так, чтобы результат работы над файлом doc.doc сохранялся в другой файл doc1.doc, а сам файл doc.doc оставался без изменений???
Если да, то напишите пожалуйста с помощью какой функции этого можно достичь…
Или какие параметры надо передаватьword.documents.save();…
mic_2000 (2005-08-16 12:58:00) [1]Попробуй открывать шаблон так
WordApp.Documents.Add(Template := 'c:\word.dot');
Kray (2005-08-16 12:52:00) [2]На мой взгляд, правильней открывать нужно. т.е. когда открываешь шаблон с созданием нового документа и когда открываешь шаблон для редактирования - разные вещи. Где разница не помню.
kblc (2005-08-13 20:02:00) [3]
Word.ActiveDocument.SaveAs('FileName',$00000006); // AS *.RTF
и т.д. ... поищи остальное в инете ;)