在Delphi REST中使用ContentType 'multipart/form-data'发布数据,可以按照以下步骤进行操作:
以下是一个示例代码:
var
RESTClient: TRESTClient;
RESTRequest: TRESTRequest;
FileStream: TFileStream;
begin
RESTClient := TRESTClient.Create(nil);
RESTRequest := TRESTRequest.Create(nil);
try
RESTClient.BaseURL := 'http://example.com/api';
RESTRequest.Client := RESTClient;
RESTRequest.Method := rmPOST;
FileStream := TFileStream.Create('path/to/file', fmOpenRead);
RESTRequest.AddParameter('file', FileStream, TRESTRequestParameterKind.pkREQUESTBODY);
RESTRequest.ContentType := 'multipart/form-data';
RESTRequest.Execute;
finally
RESTRequest.Free;
RESTClient.Free;
FileStream.Free;
end;
end;
在这个例子中,我们创建了一个RESTClient和RESTRequest对象,并将RESTClient的BaseURL属性设置为目标API的URL。然后,我们创建了一个TFileStream对象,将要上传的文件加载到流中,并将其分配给RESTRequest的Params参数。最后,我们设置RESTRequest的ContentType属性为'multipart/form-data',并调用Execute方法来发送请求。
请注意,这只是一个基本的示例,实际情况中可能需要根据具体的API要求进行更多的配置和参数设置。
领取专属 10元无门槛券
手把手带您无忧上云