AnsiString Memory Leak in array of const

[raphaelm]

Ich benutze in einer Prozedur als Übergabeparameter ein array of const. Hier muss allerdings ein Leck sein.

Delphi-Quellcode:

procedure test(const A: array of const);
var hlp : string;

Delphi-Quellcode:

...
for i := Low(A) to High(A) do begin
  hlp := '';
  with A[i] do
    case VType of
       vtChar: hlp := string(vChar);
       vtExtended: str(vExtended^: 12: 2, hlp);
       vtInteger: hlp := format('%d', [VInteger]);
       vtAnsiString: hlp := String(vAnsiString); // Hier müsste der Fehler sein
       vtstring: hlp := (vstring^);
    end;
  end;
end;
...

Wenn ich
 vtAnsiString: hlp := trim(String(vAnsiString)); benutze, funktioniert es, allerdings sollen die Leerzeichen nicht abgeschnitten werden.

Kann mir jemand auf die Sprünge helfen was hier falsch läuft?