Foros Club Delphi - .doc a html con el Word

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)

- Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)

- - .doc a html con el Word (https://www.clubdelphi.com/foros/showthread.php?t=3534)

.doc a html con el Word

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.

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.

Código:

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

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.