.doc a html con el Word

[SCH]

Hola, necesito pasar un documento Word .doc a html, para hacerlo utilizo el siguiente código:

------
...
WordApp := CreateOleObject('Word.Basic');
WordApp.FileOpen(archivo);
WordApp.FileSaveAs(Name := 'temp.htm', Format := 10);
...
------

Con él consigo salvar el documento como html pero sólo si el Office instalado es el XP, si es el 97 la última linea parece que debe variar y asignarle a Format el valor 8.
La pregunta es cómo se puede obtener la versión del Office que tenga instalada el equipo (para ejecutar una linea u otra) o si hay otra formar de salvar en formato html de forma que el código sea el mismo para todas las versiones del Office.

Gracias, espero que me podais echar una mano.

[Ruben_Cu]

Hola SCH, quizas te pueda servir conocer sobre que plataforma estás con esta declaración te devolverá verdadero si estás en w2000 o XP y falso para w98 o anterior.

if Win32Platform = VER_PLATFORM_WIN32_NT then
WordApp.FileSaveAs(Name := 'temp.htm', Format := 10)
else WordApp.FileSaveAs(Name := 'temp.htm', Format :=8);


Saludos y suerte

[SCH]

Sí, podría venir bien pero si tiene el Office XP instalado sobre un Win98 o viceversa.........
Si alguien tiene otra idea, pero gracias de todas formas.