Search code examples
delphistringmemory-managementpointersfastmm

Delphi - structures' strings not being freed [FastMM manager]

If I declare 

PSomeStruct = ^TSomeStruct;
TSomeStruct = record 
  s1 : string;
end;

and I run the following code: 

var
  p: PSomeStruct;
begin
  new(p);
  p^.s1:= 'something bla bla bla';
  dispose(p);

the FastMM 4 memory manager reports that there was a memory leak (type: string, data dump: "something bla bla bla"). However, if I do set the s1 string to empty before calling dispose it's OK.

The second way I found is to change from record type to class, then instead of new I'm creating the instance, and instead of dispose I'm calling instance.Free(). It works without manually cleaning the strings.

Is there a way to make Delphi automatically clean my strings when I call dispose?

Solution

  • Is FastMM the first unit used in your .dpr? Otherwise it could be finalized too early, reporting false memoryleaks.

    And does this simplified codesample also generate the same memoryleak as when you use your JvSimpleXML? When it's not, there is probably more going on then you suspect.

    In my opinion: when FastMM reports a memory leak, there is a memoryleak.