curl mit @ im Dateinamen nach Pascal übersetzen

[Kas Ob.]

I am afraid that there is no easy way (ready to be used API), and these files should be manually formed into a body request.

This show the structure
https://microsoft.public.winhttp.nar...part-form-data

The most important is the Content-Disposition to be filled right, and you must fill the "Content-Type: multipart/form-data; boundary=" not leaving it to be filled automatically.

Also you don't need that much of '-', in "boundary=" it is shorter by '-', in fact you don't need them at all in in the HTTP header, only in the body as separator you need 2 dashes "--".

[philipp.hofmann]

Mit dem folgenden Code geht es erfolgreich via Indy:

Delphi-Quellcode:

      with TIdHTTP.Create(nil) do
      try
        var FIdSSLIOHandlerSocketOpenSSL:TIdSSLIOHandlerSocketOpenSSL:=TIdSSLIOHandlerSocketOpenSSL.Create(nil);
        var Params: TIdMultiPartFormDataStream;
        filename:=StringReplace(Training.filename, '.ictt', '.fit', [rfIgnoreCase]);
        FIdSSLIOHandlerSocketOpenSSL.SSLOptions.Method := sslvTLSv1_2;
        FIdSSLIOHandlerSocketOpenSSL.SSLOptions.SSLVersions := [sslvTLSv1_2];
        IOHandler := FIdSSLIOHandlerSocketOpenSSL;
        Request.ContentType := 'multipart/form-data';
        Request.CustomHeaders.add('Authorization: Bearer ' + bearer);
        Params := TIdMultiPartFormDataStream.Create;
        try
          params.AddFile('file', filename, GetMIMETypeFromFile(filename));
          ResponseStr := Post('https://pushinglimits.club/api/oauth/upload_single_fit_file', Params);
        finally
          Params.Free;
        end;
      finally
        Free;
      end;

Macht von außen betrachtet, genau das gleiche, aber irgendwie scheint die interne Formatierung anders zu sein.