Пятница, 17.05.2024, 13:03
Главная Регистрация RSS
Приветствую Вас, Гость
Главная » Delphi и Microsoft Office » Работа с сервером Word. Часть 2
08:21

Работа с сервером Word. Часть 2

Создание нового документа Document и включение его в Documents осуществляется методом Add объекта Documents:

в Word97:

function Add(var Template: OleVariant; 
var NewTemplate: OleVariant): WordDocument;

в Word2000, WordXP:

function Add(var Template: OleVariant; 
var NewTemplate: OleVariant;
var DocumentType: OleVariant;
var Visible: OleVariant): WordDocument;

Первые 2 аргумента этого метода задаются в любой версии Microsoft Office. Первый аргумент Template указывает шаблон, который используется при создании документа. Если этот аргумент не указан то документ создается на основе шаблона Обычный (Normal). Второй аргумент NewTemplate булева типа определяет, открывается ли документ как шаблон (при значении true), или как обычный документ. По умолчанию NewTemplate = false, т.е. отрывается обычный документ.

В Microsoft Office 97 в метод Add передаются только эти 2 аргумента. В Microsoft Office 2000/XP метод Add принимает еще 2 необязательных параметра: DocumentType — тип документа, и Visible — аргумент булева типа, определяющий, должен ли быть виден этот документ. Параметр DocumentType может принимать одно из следующих значений: wdNewBlankDocument — новый пустой документ, wdNewEmailMessage — новое электронное сообщение, wdNewFrameset — новый фрейм, wdNewWebPage — новая веб-страница. По умолчанию принято значение wdNewBlankDocument, так что если оно вас устраивает, можете его не изменять. Параметр Visible определяет, открывается ли документ в видимом окне. По умолчанию true — в видимом.

Метод Add — один из примеров, когда вам надо решать, делается ли приложение, ориентированное на определенную версию Microsoft Office, или вы хотите создать универсальное приложение. Если приложение ориентировано на Microsoft Office 2000/XP, то оператор создания нового пустого документа при работе с сервером СОМ может иметь вид:

WordApplicationl.Documents.Add(EmptyParam, EmptyParam, 
EmptyParam, EmptyParam);

При этом в модуль должен быть включен оператор

uses ... Word2000;

или

uses ... WordXP;
Категория: Delphi и Microsoft Office | Просмотров: 1196 | Добавил: PeKpyT | Рейтинг: 0.0/0
Всего комментариев: 0
Добавлять комментарии могут только зарегистрированные пользователи.
[ Регистрация | Вход ]