Discussion :

[miniil]

Bonjour,

Je me demandais si il existait un moyen simple de vérifier qu'on a bien libéré tous les objets créés dans un programme Delphi.

De plus, pour libérer un objet, quelle méthode vaut-il mieux appeler?
Destroy?
Free?
FreeAndNil?

D'avance je vous remercie de votre aide.

[ShaiLeTroll]

Destroy? - JAMAIS
Free? - Classique
FreeAndNil? - c'est n'est qu'un Free et un := nil, utile pour les globales et objets contenus dans un objet si l'on utilise Assigned

Sinon, à part, être rigoureux, rien ne permet de savoir si l'on a tous libéré, il y avait un programme avec Delphi 4 pour détecter les fuites mémoires, j'ai oublié son nom, mais cela donne que le nombre de pointeur oublié et cela peut être n'importe quoi !

[Age-Studio-Celtic]

Bonjour,

En fait, tout dépends de comment tu a créer ton objet.
Si celui-ci est une classe intégrée à ton appli, elle se détruira toute seule.
par contre si elle est créé indépendemment, il vaut mieux la détruire soit même.
Dans ce cas, je fait cela:

Code :

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

if MyObject <> nil then FreeAndNil(MyObject);

[miniil]

Merci pour vos réponses rapides.

Je suis en charge d'une application delphi.
Ce n'est pas moi qui l'ai créée au départ.

Toutes les libérations (ou presque) sont effectuées avec Destroy.

Pouvez-vous me dire pourquoi JAMAIS utiliser le Destroy?

[sjrd]

Extrait du manuel Delphi :

L'unité System comprend deux procédures, GetMemoryManager et SetMemoryManager, permettant aux
applications d'intercepter les appels de bas niveau du gestionnaire de mémoire. L'unité System fournit également
une fonction nommée GetHeapStatus qui renvoie un enregistrement contenant des informations d'état du
gestionnaire de mémoire détaillées.

Avec ça tu peux te coder un moniteur d'allocations/désalocations. Et quand t'as un doute sur un pointeur, ben tu fais un dump memory dessus.

C'est pas plus compliqué que ça

[Rayek]

http://www.developpez.net/forums/sho...d.php?t=346314

[e-ric]

Destroy? - JAMAIS
Free? - Classique
FreeAndNil? - c'est n'est qu'un Free et un := nil, utile pour les globales et objets contenus dans un objet si l'on utilise Assigned

Sinon, à part, être rigoureux, rien ne permet de savoir si l'on a tous libéré, il y avait un programme avec Delphi 4 pour détecter les fuites mémoires, j'ai oublié son nom, mais cela donne que le nombre de pointeur oublié et cela peut être n'importe quoi !

Une unité très utile mais pas toutjours facile à exploiter : MemCheck.pas. Pour plus d'infos, Google (ou autre) est votre ami

cdlt

[Gilbert Geyer]

Et en déclarant, par exemple, pour tous les objets que leur propriétaire est :
- "Application" c'est-y pas uffisant pour s'assurer que tous seront détruits en quittant le programme ?,
- ou bien "Form1" ou un autre composant de type TForm pour s'assurer de la destruction à la fermeture de la fenêtre à laquelle l'objet est attribué ?

[sjrd]

Tous les objets n'ont pas de propriétaire Seuls les TComponent en ont. Il ne faut surtout pas réduire la hiérarchie des classes à la VCL. C'est bien plus gros que ça

[Gilbert Geyer]

A Sjrd :
Merci pour l'info je saurai au moins que, seuls les TComponent ayant un propriétaire, je serai assuré de leur destruction simplement en déclarant l'application ou la form en tant que propriétaire.

[Clorish]

A Sjrd :
Merci pour l'info je saurai au moins que, seuls les TComponent ayant un propriétaire, je serai assuré de leur destruction simplement en déclarant l'application ou la form en tant que propriétaire.

La property owner des TComponent etant de type TComponent ... tout composant peut etre le proprietaire (owner) d'un autre composant et pas seulement la form ou l'application

[Gilbert Geyer]

A Clorish / msg d'Hier 21h48

Merci pour l'info, cela élargit l'étendue du champ des possibilités en cas de besoin.
(Pour ma part quand je crée une rafale de trucs par voie dynamique je me contente le plus fréquemment de déclarer leur propriétaire comme étant la Form car leur durée d'exsitence n'a en général pas besoin d'être supérieure à celle de la Form à laquelle ils sont associés)