Discussion :

[scafc2]

bonjour la communauté

je crée de multiples fichiers XML

exemple de la syntaxe utilisé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
18
19
20
21
 
var
  XMLDoc: TXMLDocument;
  // ou XMLDoc: IXMLDocument;
begin
  XMLDoc := TXMLDocument.Create(nil);
  try
    XMLDoc.Active := True;
    XMLdoc.ChildNodes.Clear;
    XMLdoc.Version := '1.0';
    XMLdoc.Encoding := 'ISO-8859-1';
 
    with XMLdoc.AddChild('XMLMSG') do
    begin
      with AddChild('HEADER') do
      begin
        AddChild('SENDERAPPL').Text := 'AAAA';
      end;
  finally
    XMLDoc := nil;
  end;

quant je passe mon appli sous memproof il me detecte des fuites memoires
correspondant à chaque AddChild
ex:
SysAllocStringLen(AAAA, 4)


Quelqu'un sait pourquoi ???? je ne libere pas la memoire ???

par avance merci

[slimjoe]

As tu le même résultat si ta variable est de type IXMLDocument au lieu de TXMLDocument ? Le constructeur de TXMLDocument retourne un IXMLDocument si aucun owner n'est passé en paramètre. Si par contre tu passes un paramètre et que ta variable est un TXMLDocument, tu devras libérer l'objet à l'aide de Free() (nil ne libère rien).

[scafc2]

Ouais c'est exactement pareil !?!?

[pz]

Il me semble que le constructeur de TXMLDocument n'accepte pas nil comme paramètre.

Essaie de remplacer par

Code :

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

1
2
 
  XMLDoc := TXMLDocument.Create(Application);

[scafc2]

Oui c'est ce que je fais ... en fait avec les 2 cas, j'ai exactement le même diagnostic sous memproof

[Pedro]

Salut
J'ai exactement le même souci avec un TXMLDocument posé sur la fiche...

Dès que je retire les appels à ses fonctions, tous les résidus de mémoire tels que décrits par scaf2 disparaissent...

[scafc2]

En fait ça fait monter la memoire cache ....

Mais au bout d'un moment, j'ai l'impression qu'elle baisse ???