Probleme d'insertion d'un lien hypertexte OleWord

je n'arrive pas a readapter l'insertion d' un lien hypertexte dans une feuille Word
j'ai trouve un code en Delphi:
le code:

Code:

---

1 2	InstanceDeWord.Selection.Hyperlinks.Add(InstanceDeWord.Selection.Range,Lien);

---

Je viens de trouver il faut ecrire le code comme ceci:
le code:

Code:

---

1 2	vMSWord.OlePropertyGet("Selection").OlePropertyGet("Hyperlinks").OleProcedure("Add", vMSWord.OlePropertyGet("Selection").OlePropertyGet("Range"), "c:\\book1.doc");

---

Il ne faut pas oublier de doubler le '\' dans le nom de chemin sinon ca ne marche pas le lien ne se fait quand on clique dessus