Вниз
Скачать: CL | DM;

Как определить версию Word   Найти похожие ветки 

 
Juliet   (2002-07-16 13:06) [0]

Как определить версию и местоположение Microsoft Word назначенного системой обработчиком файлов с расширением .DOC?


 
olookin ©   (2002-07-16 13:12) [1]

Просканировать все диски на предмет наличия X:\Program Files\Microsoft Office\Office\Winword.exe. А версия определяется как Word.Application.Version, где сначала вызывается Word (тип Variant, CreateOleObject(Word.Application)).


 
Вячеслав ©   (2002-07-16 13:12) [2]

Сам и ответил. Посмотри в регистри чего назначено на это расширение и где оно лежит :)


 
Juliet   (2002-07-16 13:22) [3]

У меня на компе установлен и 97 и 2000 Word (т.е. 8 и 9 версии)
А в реестре c расширением Doc связан 8 Word, хотя грузится 9 - или я не там смотрю?


 
delphi_profi   (2002-07-16 13:23) [4]

А сканировать то зачем???
Так же, как и версия: Application.Path


 
Juliet   (2002-07-16 13:26) [5]

У меня на компе установлен и 97 и 2000 Word (т.е. 8 и 9 версии)
А в реестре c расширением Doc связан 8 Word, хотя грузится 9 - или я не там смотрю?


 
Juliet   (2002-07-16 13:37) [6]

Самое интересное в том, что я запускаю сервер автоматизации Word и открываю в нем документ. И в зависимости от того, какой из Word-ов (97 или 2000) был перед этим загружен, в той же версии и открывется документ. А мне бы хотелось узнать, какой же Word загрузится в данный момент?


 
olookin ©   (2002-07-16 15:31) [7]

Послушайте, раз Вы запускаете Word, значит можно и вызвать Word.Application.Version. Или нельзя?
Ну можно так (по-моему).
Сначала:
Word:=GetActiveOleObject(Word.Application);
Затем:
Ver:=Word.Application.Version;
Showmessage(Ver);



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.013 c
4-95627
Yerba
2002-05-21 14:29
2002.07.29
О установке своего языка


8-95457
Дмитрий Катаев
2002-01-26 19:12
2002.07.29
Реально ли на Delphi написать _конкурентноспособный_ трехмерный движок?


1-95318
newUser
2002-07-17 14:20
2002.07.29
Popup


3-95206
nimble
2002-07-05 08:18
2002.07.29
Запрос


1-95433
eruc
2002-07-16 18:16
2002.07.29
XML ????




   Наверх