Современные технологии разработки программного обеспечения. Сивохин А.В - 19 стр.

UptoLike

19
г) в файлах *. dll в качестве их ресурсов;
д) в составном документе OLE;
е) в специально созданных справочных файлах, например для
текстового процессора Word в файле Wordbasic. hlp.
При разработке сервера в среде Delphi по умолчанию создается
файл формата *. tlb, который компонуется одновременно с
выполняемым файлом на этапе компиляции.
Среда Delphi значительно упрощает доступ к серверам
автоматизации. Если известен идентификатор сервера объекта
ClassName, то с помощью функции CreateOleObject можно создать
объект автоматизации и получить доступ к его свойствам и методам,
используя диспетчерский интерфейс, указатель на который
возвращает эта функция.
Прототип этой функции следующий:
function CreateOleObject(const ClassName:String):IDispatch.
Например, для создания объекта сервера Word и вставки в
документ текста с использованием этого объекта
следует написать
код:
Uses ComObj;
Var WordVar:OleVariant;
………………………………………….
procedure Tform1. ButtonClick(Sender:TObject);
begin
WordVar:=CreateOleObject(‘Word. Basic’);
WordVar:=Insert(‘Вставка в документ’);
end;
Аналогичным образом можно вызвать следующие методы
объекта Word: AppShow; FileExit; FileNew; FileClose; FileSave;
FileSave(‘NewName’); LineUp; LineDown; FormatFont(…). Заметим,
что последний метод имеет 20 необязательных параметров. В Delphi
число параметров любого метода не должно превышать 64, а тип
свойства или параметра метода ограничен следующим списком:
 г) в файлах *. dll в качестве их ресурсов;
 д) в составном документе OLE;
 е) в специально созданных справочных файлах, например для
текстового процессора Word в файле Wordbasic. hlp.
  При разработке сервера в среде Delphi по умолчанию создается
файл формата *. tlb,    который компонуется одновременно с
выполняемым файлом на этапе компиляции.
  Среда Delphi значительно упрощает доступ к серверам
автоматизации. Если известен идентификатор сервера объекта
ClassName, то с помощью функции CreateOleObject можно создать
объект автоматизации и получить доступ к его свойствам и методам,
используя диспетчерский интерфейс,        указатель на который
возвращает эта функция.
              Прототип этой функции следующий:
function CreateOleObject(const ClassName:String):IDispatch.
  Например, для создания объекта сервера Word и вставки в
документ текста с использованием этого объекта следует написать
код:
       Uses ComObj;
       Var WordVar:OleVariant;
       ………………………………………….
procedure Tform1. ButtonClick(Sender:TObject);
begin
       WordVar:=CreateOleObject(‘Word. Basic’);
       WordVar:=Insert(‘Вставка в документ’);
end;
    Аналогичным образом можно вызвать следующие методы
объекта Word: AppShow; FileExit; FileNew; FileClose; FileSave;
FileSave(‘NewName’); LineUp; LineDown; FormatFont(…). Заметим,
что последний метод имеет 20 необязательных параметров. В Delphi
число параметров любого метода не должно превышать 64, а тип
свойства или параметра метода ограничен следующим списком:
                                   19