Функция, реализующая механизм доступа к OLE-объекту, находится в биб-
лиотеке ComObj.pas — функция CreateOleObject. Ее единственным аргумен-
том является строка-идентификатор, а возвращает она ссылку на объект.
Рассмотрим пример использования этой функции.
Создадим новый проект Delphi, в котором есть одна форма. В модуле фор-
мы укажем ссылку на использование библиотеки ComObj и объявим пере-
менную W:variant. В форме расположим кнопку. В процедуре обработки
нажатия кнопки напишем следующий программный текст.
Создание объекта Word.Application
uses ComObj;
var W:variant;
procedure TForml .ButtonlClick(Sender: TObject);
begin
W:=Create01e0bject('Word.Application1);
end;
Если выполнить этот фрагмент программы, то приложение Word запустит-
ся, но его окно не отобразится на экране монитора. В память компьютера
будет загружен объект Application, обеспечивающий доступ ко всем внут-
ренним объектам, коллекциям и свойствам. В данный момент нас интересу-
ет только одно свойство этого объекта — Visible. Если его значение устано-
вить в True, то окно приложения Word станет видимым. Расположим в на-
шей форме компонент CheckBoxl, в процедуре отклика которого напишем
следующий программный текст:
Задание видимости окна приложения Word
procedure TForml.CheckBoxlClick(Sender: TObject);
begin
W.Visible:=CheckBoxl.Checked;
end;
Манипулируя состоянием объекта CheckBoxl, мы обнаружим, что окно
приложения то появляется, то пропадает с экрана монитора. Приложение
загружено в память, без каких-либо открытых документов (рис. 5.1).
Подробнее можно посмотреть на компьютерном форуме http://www.hardforum.ru/f137/ тут.
Рис. 5.1. Отображенное окно запущенного приложения Word
При формировании документов свойство Visible лучше установить в значе-
ние False, и устанавливать его в значение True только для отображения
полностью созданных документов свойство Visible. Так можно сократить
время создания отчетов и повысить производительность работы приложе-
ний. Отлаживая приложение или изучая свойства объекта Application, лучше
видеть все действия на мониторе. Поэтому установим Visible := True и при-
ступим к работе с документами Word. |
Главная
Каталог файлов
