![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как узнать, что Word установлен? [D7]
AlexanderMS © (2007-10-21 16:11:00)Скажите, пожалуйста, как узнать, установлен ли Word на компьютере? Видел пример в FAQ:
var MsWord: Variant;
...
try // Если Word уже запущен
MsWord := GetActiveOleObject('Word.Application');
// Взять ссылку на запущенный OLE объект
except
try // Word не запущен, запустить
MsWord := CreateOleObject('Word.Application');
MsWord.Visible := True; // вот эта строка обязательна или нет?
except ShowMessage('Не могу запустить Microsoft Word');
Exit;
end;
end;
Тут есть строка:MSWord.Visible := true, а мне не нужно его показывать до окончания формирования отчёта. Вот я не знал, играет ли она роль в определении того, что Word установлен?
Ещё: этот способ надёжный? Просто у меня нет возможности проверить программу на компьютере, где нет Word'а, а конечный продукт могут запустить на любом компьтере.
DrPass (2007-10-21 17:59:00) [1]
> AlexanderMS © (21.10.07 16:35) [2]
> А почему тогда в FAQ так написано, в блоке try...except
> ?
Автор FAQ просто сделал Ctrl+C/Ctrl+V из своей программы :)
AlexanderMS (2007-10-21 16:35:00) [2]
> А если чуть лучше подумать - какое отношение имеет команда
> "Visible:= true" к определению того, установлен ли Word?
>
А почему тогда в FAQ так написано, в блокеtry...except? Вот я и задумался.
Спасибо, буду знать.
DrPass (2007-10-21 16:33:00) [3]
> Вот я не знал, играет ли она роль в определении того, что
> Word установлен?
А если чуть лучше подумать - какое отношение имеет команда "Visible:= true" к определению того, установлен ли Word?