Discussion :

[defluc]

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 :

Sélectionner tout - Visualiser dans une fenêtre à part

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

Le message d'erreur est

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.

[abdelghani_k]

Jetes un coup d'oeuil sur :

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

[Négrier]

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 :

Sélectionner tout - Visualiser dans une fenêtre à part

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