Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Выяснение версии Office


markers ©   (2004-12-12 19:44:00) 

Народ подскажите плиз как выяснить наличие Microsoft Office и ещё версию (Word/Excel/etc.)


GanibalLector   (2004-12-13 20:16:00) [1]


var XLApp:Variant;
begin
XLApp:=CreateOleObject('Excel.Application');
XLApp.Visible:=false;
MessageDLG(XLApp.Version,mtinformation,[mbok],0);
XlApp.Quit;
end;


markers   (2004-12-13 06:49:00) [2]

А как мне проверить существование таких папок, ведь если делать простым перебором 8, 9, XP, 10
Подскажите как лучше это орзанизовать?


vertal   (2004-12-12 20:19:00) [3]

Пошарь в ключе HKEY_CURRENT_USER\SOFTWARE\Microsoft\Office\ на предмет его наличия и наличия в нем ключей типа "8.0" , "9.0" , "XP" , "10.0" и т.д. . Если подобный ключ там найден - то можно предполагать, что на машине установлена эта версия Office. Наличие Word логично устанавливать по нахождению там подключа "Word"


Наверх

Титульная страница Поиск, карта сайта Написать письмо