Não faz upload de múltiplos arquivos em Lazarus

[romerofartura]

Fiz o ajuste se quiser avaliar.
No arquivo: RESTRequest4Delphi/src/RESTRequest4D.Request.FPHTTPClient.pas
Na procedure TRequestFPHTTPClient.ExecuteRequest(const AMethod: TMethodRequest);
Adicionei as últimas três linhas do bloco abaixo:

  for LFieldName in FFiles.Keys do
        begin
          LFile := FFiles.Items[LFieldName];
          LContent := '--' + LBound + _CRLF;
          LContent := LContent + Format('Content-Disposition: form-data; name="%s"; filename="%s"' + _CRLF, [LFieldName, ExtractFileName(LFile.FFileName)]);
          LContent := LContent + Format('Content-Type: %s', [LFile.FContentType]) + _CRLF + _CRLF;
          LStream.WriteBuffer(LContent[1], Length(LContent));
          LFile.FFileStream.Position := 0;
          LStream.CopyFrom(TMemoryStream(LFile.FFileStream), LFile.FFileStream.Size);
          LStream.WriteBuffer(_CRLF, Length(_CRLF));
        end; 

[viniciussanchez]

Bom dia... gostaria de nos enviar um pull request com a implementação?