![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Старый, добрый MS Office или о версиях... [D6, Win95/98, Win2k]
vlad_ri1 © (2002-10-29 21:22:00)Как узнать версию установленного MS Office?
Вариант с чтением ключей реестра типа ...\SOFTWARE\Microsoft\Office хорош, да не очень, ибо:
1. если был произведён апгрейд с предыдущей версии (предположим с 8.0 до 9.0) то в данном ключе будет информация об обеих версиях, и
2. если был произведён лишь частичный апгрейд то непонятно какой версией того или иного приложения пользуеться юзер.
¤NoNaMe¤ (2002-10-29 22:10:00) [1]regData := TRegistry.Create;
regData.RootKey := HKEY_CLASSES_ROOT;
try
if regData.OpenKey("\Excel.Application\CurVer", False) then
begin
cls_ExcelObject := regData.ReadString("");
regData.CloseKey;
end
finally
regData.Free;
end;
try
Excel:=CreateOleObject(cls_ExcelObject);