Ouverture d'excel dans un thread

Hello delphi's friends,

J'ai une application qui tourne sans problème mais dont un module qui remplit des feuilles d'un classeur Excel est très long.
Je cherche en vain un exemple d'utilisation d'Excel dans un thread.
En effet, celui que j'ai créé coince sur l'instruction

Code:

---

TargetWbk := xlApp.Workbooks.add(xlWBatWorsheet, LcId + 1);

---

Le message d'erreur est

Citation:

---

Un appel sortant ne peut pas être effectué étant donné que l'application répartit un appel entrant synchrone

---

Une aide me serait précieuse et je remercie d'avance tout contributeur.

Jetes un coup d'oeuil sur :

http://www.jcolibri.com/articles/off...el_delphi.html

Pour utiliser Excel et plus généralement des serveurs COM depuis un
Thread j'ai du surchargé la méthode Execute du TThread de la façon
suivante.

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12

uses ActiveX   type TMonThread=class(TThread) procedure Exectute; override; end;   procedure TMonThread.Execute; begin CoInitializeEx(nil, COINIT_MULTITHREADED or COINIT_APARTMENTTHREADED);   //...suite du code end;

---

voilà si ça peut servir :P