export de delphi à excel

Question

Voilà j'utilisais le code suivant et tout se passait comme sur des roulette mais un jour le message suivant est apparu : 
"Le projet toto.exe a provoqué une classe d'exception EOleSysError avec le message 'CoInitialize n'a pas été appelé'. Processus stoppé. Utilisez Pas-à-pas ou Exécuter pour continuer."
Voilà mon code:

var
  v_ex : variant;
begin
     v_ex := createoleobject('Excel.Application');
     v_ex.workbooks.open('c:\wddesub07\fichedde.xls');
end;

Si je rajoute un coinitialize un autre message apparaît.

"Le projet toto.exe a provoqué une classe d'exception EVariantInvalidOpError avec le message 'Opération de variant incorrecte'. Processus stoppé. Utilisez Pas-à-pas ou Exécuter pour continuer.

Code :

var
  v_ex : variant;
begin
     v_ex.coinitialize;
     v_ex := createoleobject('Excel.Application');
     v_ex.workbooks.open('c:\wddesub07\fichedde.xls');
end;

Par contre si j'externalise cette fontion de mon projet en l'appelant par un shellExecute, elle marche.

C'est à rien y comprendre.

Aidez moi s'il vous plait

FeuilleMorte

eltoto13 · Answer

ben voila jai le meme probleme est personne repond c nul...

Export de delphi à excel

1 réponse

Votre réponse

Discussions similaires