Discussion :

[Andry]

Bonjour à tous.

Ce matin, j'ai du me plonger dans un code qu'un ami m'a fait passer car il a constaté un bug. Après verification, voici le code incriminé

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
var frmOuvrageLst : TfrmOuvrageList;
if (Not Assigned(frmOuvrageLst)) then
begin
  frmOuvrageLst := TfrmOuvrageList.Create(Nil);
  //section d'initialisation des paramètres de frmOuvrageLst
  frmOuvrageLst.show;
end
else
begin
  frmOuvrageLst.Release;
  frmOuvrageLst := Nil; //Sans ce code, la 3ème execution ne marche pas
end

La question est : après Release, frmOuvrageLst contient quoi exactement car dans l'aide de Delphi

Utilisez la méthode Release pour détruire la fiche et libérer la mémoire associée.

Merci

[Linkin]

Quand on libère un objet, seul l'espace mémoire associé est libéré. La référence pointe toujours sur cet espace mémoire "vide".

Donc si on doit tester, soit utiliser FreeAndNil pour les objets soit un Release (à cause du traitement des messages) puis une affectation à nil pour les form.

[Andry]

Quand on libère un objet, seul l'espace mémoire associé est libéré. La référence pointe toujours sur cet espace mémoire "vide".

Donc si on doit tester, soit utiliser FreeAndNil pour les objets soit un Release (à cause du traitement des messages) puis une affectation à nil pour les form.

Effectivement j'avais corriger le code pour assigner Nil à l'objet.
Donc l'assignation à nil d'un pointeur veut dire que le pointeur ne pointe sur aucune zone mémoire.

[Linkin]

C'est ça.