Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2007.11.11;
Скачать: [xml.tar.bz2];

Вниз

Как узнать, что Word установлен?   Найти похожие ветки 

 
AlexanderMS ©   (2007-10-21 16:11) [0]

Скажите, пожалуйста, как узнать, установлен ли 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 16:33) [1]


> Вот я не знал, играет ли она роль в определении того, что
> Word установлен?

А если чуть лучше подумать - какое отношение имеет команда "Visible:= true" к определению того, установлен ли Word?


 
AlexanderMS ©   (2007-10-21 16:35) [2]


> А если чуть лучше подумать - какое отношение имеет команда
> "Visible:= true" к определению того, установлен ли Word?
>


А почему тогда в FAQ так написано, в блоке try...except ? Вот я и задумался.

Спасибо, буду знать.


 
DrPass ©   (2007-10-21 17:59) [3]


> AlexanderMS ©   (21.10.07 16:35) [2]


> А почему тогда в FAQ так написано, в блоке try...except
> ?

Автор FAQ просто сделал Ctrl+C/Ctrl+V из своей программы :)



Страницы: 1 вся ветка

Форум: "Начинающим";
Текущий архив: 2007.11.11;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.04 c
11-1176983639
restar82
2007-04-19 15:53
2007.11.11
ошибка при компиляции


4-1167403723
MasteroK
2006-12-29 17:48
2007.11.11
Как извлечь выделеный текст из объектов следующих классов:


15-1190738277
Fleg
2007-09-25 20:37
2007.11.11
WinAPI


15-1192012226
Dennis I. Komarov
2007-10-10 14:30
2007.11.11
2 x ADSL


6-1173690061
Sairex
2007-03-12 12:01
2007.11.11
Помогите разобраться с Mrim (Agent.mail.ru)





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский