String MemoryLeak

[SirThornberry]

Und was passiert bei folgendem Konstrukt?

Delphi-Quellcode:

function TTwixapi.GetMainEntry(ID_MainEntry: Integer): AnsiString;
begin
  SetLength(Result, 1024);
  if not TwixGetMainentry(ID_MainEntry, @Result[1], 1024) then
    Result := '';
end;