Discussion :

[gandf]

Bonjour,

Je fais actuellement une petite application qui possède un ruban.
Je me suis aperçu, qu'à chaque fois que j'ouvre et referme un fichier, la mémoire montait et ne redescendait pas complètement.
Après différents tests, j'en suis arrivé au code suivant que j'ai collé sur un bouton pour le test.

La boite de dialogue d'ouverture du fichier s'ouvre quand j'appuie mais je ferme la fenêtre sans ouvrir un fichier, j'ai l'impression que toute la mémoire n'est pas libérée.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
try {
	OpenFile1 = new TOpenDialog(Form1);
	if (OpenFile1 != NULL)
	   {
	   if (OpenFile1->Execute())
		  {
		  //LoadFile(OpenFile1->FileName);
		  }
	   }
	}
__finally {
	      if (OpenFile1 != NULL)
             {
             delete OpenFile1;
             OpenFile1 = NULL;
             }
	  	  }

Résultat :
Dans l'observateur d'évènement je regarde la zone "mémoire (jeu de travail privée)".
1) à l'ouverture : 3696K
2) appuie sur le bouton (ouverture de la boite de dialogue) : 8452K
3) de retour sur l'application : 7688K
2) appuie sur le bouton (ouverture de la boite de dialogue) : 9156K
3) de retour sur l'application : 8692K
2) appuie sur le bouton (ouverture de la boite de dialogue) : 9584K
3) de retour sur l'application : 9200K

Très rapidement on arrive à plus de 14M alors que l'on a réellement rien fait.
Code guard n'indique pas de fuite de mémoire tout comme la directive ReportMemoryLeaksOnShutdown.
D'ailleurs, si j'active cette directive, il y a encore beaucoup plus de mémoire de consommée.
Si je regarde le "différentiel de la plage de travail (mémoire)", je vois que la quantité allouée est toujours supérieure à la quantité libérée.


Savez-vous de quoi cela peut venir ?

Merci.

[DjmSoftware]

Salut

Lors de la création de l'objet OpenFile1 tu luis attribue comme propriétaire La form même

Code :

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

1
2
 
OpenFile1 = new TOpenDialog(Form1);

de ce fait c'est ta Form lors de sa destruction qui sera chargée de la destruction de l'object et non toi

Code :

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

1
2
 
delete OpenFile1;

si tu veux gérer toi même la mémoire tu dois créer l'objet de cette manière

Code :

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

1
2
 
OpenFile1 = new TOpenDialog(NULL);

cdlt

[gandf]

Merci pour cette piste mais malheureusement, cela ne change rien.

Si je met NULL, les chiffres sont les mêmes.

Au départ, j'ai utilisé un TActionManager avec une action standard d'ouverture de fichier.
En voyant la montée en mémoire anormale, j'ai essayé de réduire le code au minimum pour trouver d'où vient cette consommation.

Le problème se produit en debug et release tout comme en x86 que x64.

Le code suivant ne pose pas de perte de mémoire :

Code :

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

1
2
3
OpenFile1 = new TOpenDialog(NULL);
delete OpenFile1;
OpenFile1 = NULL;

Par contre, le code suivant fait augmenté la mémoire consommée.

Code :

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

1
2
3
4
OpenFile1 = new TOpenDialog(NULL);
OpenFile1->Execute();
delete OpenFile1;
OpenFile1 = NULL;

J'en déduis que c'est l'appel à execute() le problème.
Si je lance l'appel 5 fois d'affilé, j'ai toujours le même phénomène en 5 fois plus important.

Code :

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

1
2
3
4
5
6
7
8
OpenFile1 = new TOpenDialog(NULL);
OpenFile1->Execute();
OpenFile1->Execute();
OpenFile1->Execute();
OpenFile1->Execute();
OpenFile1->Execute();
delete OpenFile1;
OpenFile1 = NULL;

Au final, ce ne serait donc pas la gestion de la vie du composant le soucis.

Avez-vous une nouvelle idée ?

Merci.

[nirgal76]

mais OpenFile1 il sort d'ou ? c'est une variable de ta classe (genre TOpenDialog* OpenFile1) ou un composant vcl déposé sur la fiche (et dans ce cas, ne pas faire de new ni delete, l'objet est géré par la fenêtre)
vu son nom, "OpenFile1", j'ai l'impression que c'est un composant déposé sur la fenêtre.

[gandf]

C'est une variable de ma classe.
Je l'ai nommé comme le 1er composant que l'on pose sur la fiche car j'ai d'abord fait un test avec ce composant avant de le supprimer.
Ensuite, j'ai créé une variable ayant le même nom pour ne pas changer le code.

Je veux bien changer le nom de la variable mais cela ne changera rien au résultat.

[DjmSoftware]

Avant d'ouvrir un cas chez Emnarcadero Assure toi que le composant TOPenDialog que tu avait placé sur ra fiche n'est plus référé dans ton .h
tu peux encore tenter un autre essai du style un composant local à ta Procédure du genre

Code :

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

1
2
3
4
5
 
 
TOpenDialog* MyDialog= new TOpenDialog(NULL);
MyDialog->Execute();
delete MyDialog;

cdlt