Récupérer une instance existante d'un exécutable étant un serveur d'automation

Code:

---

1 2 3 4

FVar:=CreateOleObject('Sapanet.BrowserSapanet'); // Une instance est bien lancée   FVar:=GetActiveOleObject('Sapanet.BrowserSapanet'); // Directement à la suite pour essayer de recuperer l'instance (qui existe puisque je viens de la lancer)

---

Lors de l'execution j'ai une erreur "Operation non disponible". On ne trouve pas d'instance de l'exe :?

Je ne comprends pas pourquoi :cry:

Je suis sous delphi6

Merci d'avance pour votre aide

Jean-Luc

Code:

---

1 2	GetActiveObject(CLASS_BrowserSapanet,nil,ActiveObject); if ActiveObject<>nil then FServ:= ActiveObject as IBrowserSapanet

---

C'est Ok avec ce code :D