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