Discussion :

[trident_job]

Salut, petite question :

je lance Excel et j'effectue quelques traitements par le code suivant.

Code :

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

1
2
3
4
  // Create Excel wrapper
  FMSExcel := TExcelApplication.Create(nil);
  ...
  FreeAndNil(FMSExcel);

A la fin, je voudrais libérer mon instance TExcelApplication, sans fermer Excel ... or, cela parait inevitable.
Si je ne libere pas mon instance FMSExcel , Excel reste bien ouvert, mais j'ai un memory leak puisque le wrapper n'est pas libéré.

Avez-vous une idée ?

[Laurent Dardenne]

Salut,
il faut peut être se déconnecter de l'instance auparavant ?
Je n'ai pas le code sous les yeux mais dans ce cas il se peut qu'elle se libére automatiquement.
As-tu essayé d'exécuter Excel indépendamment puis de t'y connecter au travers de TExcelApplication...
[edit]
Toute manipulation de TExcelApplication s'appuie sur une interface donc le compteur de référence entre en jeux.

[trident_job]

il faut peut être se déconnecter de l'instance auparavant ?

Idem si je me deconnecte avant de liberer l'instance.

As-tu essayé d'exécuter Excel indépendamment puis de t'y connecter au travers de TExcelApplication...

Ce n'est pas ce que je cherche à faire, mais j'essayerai pour voir. Si ca marche, ca ne m'avance pas plus

Toute manipulation de TExcelApplication s'appuie sur une interface donc le compteur de référence entre en jeux.

C'est tout à fait normal est justifié, mais liberer l'instance veut-il dire obligatoirement fermeture de EXCEL ?

[Laurent Dardenne]

Si ca marche, ca ne m'avance pas plus

Par indépendamment je voulais dire via un CreateProcess ou ShellExecute au sein de ton appli.
Dans ton cas Excel doit exister comme un process et pas comme un objet OLE Automation. Mais je l'ai testé avec :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
 
 //oncreate
...
ExcelApplication1.ConnectKind := ckRunningInstance;
...
procedure TForm1.FormDestroy(Sender: TObject);
begin
  //ExcelApplication1.Quit; //ferme le process Xl actif
  // ExcelApplication1.Disconnect; // ne ferme pas XL
  // aucun code -> free de ExcelApplication1 // ne ferme pas XL
end;

mais liberer l'instance veut-il dire obligatoirement fermeture de EXCEL ?

Comme tu l'énonces c'est non mais pour COM c'est oui
S'il existe un moyen je ne le connais pas.