Per indy mehre Datein als Multipart über https versenden.

[HolgerX]

Hmm..

So nach diesem Muster?

Delphi-Quellcode:

var
  IdHTTP: TIdHTTP;
  PostData: TIdMultipartFormDataStream;
begin
  AUrl := EncodeURLA(AUrl);

  IdHTTP := TIdHTTP.Create(nil);
  try


    PostData := TIdMultipartFormDataStream.Create;
    try
      PostData.AddFile('Test_File',AFileName);
      PostData.AddFormField('Text_in_UTF8', Utf8Encode(AData),'utf-8').ContentTransfer := 'binary';
      PostData.AddFormField('Text_in_ASCII', AData, 'ISO-8859-1').ContentTransfer := 'binary';
      result := IdHTTP.Post(AURL,PostData);
    finally
      PostData.Free;
    end;
  finally
    IdHTTP.Free;
  end;
end;