linux - delphi在linux中的内存泄漏？

Question

对不起，原谅我糟糕的英语！！！

我在 System.Net.HttpClient 单元 1720 行的 CreateFormFromStrings 方法中找到了一段代码。

procedure THTTPClient.CreateFormFromStrings(const ASource: TStrings; const AEncoding: TEncoding;
const AHeaders: TNetHeaders; var ASourceStream: TStream; var ASourceHeaders: TNetHeaders);
        var
          LParams: string;
          LEncoding: TEncoding;
          I: Integer;
          Pos: Integer;
        begin
     // ******** Ignor some code 
          ASourceStream := TStringStream.Create(LParams, TEncoding.ASCII, False); 
          try
            ASourceHeaders := [TNetHeader.Create(sContentType,
              'application/x-www-form-urlencoded; charset=' + LEncoding.MIMEName)] + AHeaders;  // do not translate
          except
            FreeAndNil(ASourceStream);
            raise;
          end;
        end;    

所以我把它拿出来单独测试。不知道是不是内存泄露了。使用valgrind工具测试，你会发现：

标签： linuxdelphimemory