如何判断系统中安装的是Office 2000、Office XP 还是 Office 2003？

Question

如何判断系统中安装的是Office 2000、Office XP 还是 Office 2003？

Answer 1

var vExcelApp: Variant;vExcelApp := CreateOleObject('Excel.Application');
ShowMessage(vExcelApp.Version);

Answer 2

从注册表中找：HKEY_CLASSES_ROOT\Excel.Application\CurVer
______________________________
Delphi中文技术论坛 
http://www.delphipages.cn
专用群组号：2244008 欢迎加入！
不以物喜，不以已悲

Answer 3

读注册表好，在没有安装Office的情况下用COM方式会产生错误信息