[Word] Problème de version Word

Bonjour,

J'ai une application qui pilote Word.
Le pré-requis est d'avoir installé Word 97.

Je souhaiterais afficher un message prévenant l'utilisateur que sa version de Word doit être au mini Word 97 si ce n'est pas le cas.
En effet, j'ai des erreurs de type "Erreur de classe ..." avec Word 6 ce qui est tout à fait normal.

Comment récupère-t-on la version de Word sous Delphi ?

Merci

Sous Excel,je fais comme ceci:

Code:

---

1 2 3

MonVariant:=CreateOleObject('Excel.Application'); version:=MonVariant.version;

---

Je suppose que c'est la même chose dans WOrd. Si la syntaxe n'est pas identique, regarde dans l'aide VBA.

Dans Excel, pour accéder aux classes et aux propriétés/méthodes disponibles, je clique sur Outils,macro, visual basic editor puis je clique sur inspecteurs d'objets et j'ai la liste. C'est là que j'ai pioché Application.version

Bonjour

voiçi un extrait de l'aide de delphi.

Citation:

---

Syntaxe Delphi :

function GetFileVersion(const AFileName:string):Cardinal;

Syntaxe C++:

externPACKAGE unsigned__ fastcallGetFileVersion(constAnsiString AFileName);

Description

GetFileVersion renvoie les 32*bits les plus significatifs du numéro de version binaire d'un fichier.AFileName spécifie le nom du fichier,recherchéen utilisant le même chemin que la fonction LoadLibrary.

GetFileVersion est uniquement disponible sous Windows et ne doit pas être utilisée dans du code multiplate-forme.

---

Cela permet d'avoir tous les infos d'une application
CompgnyName/ Version/ etc..

Merci pour vos réponses.