我的目标是通过 HTTP 帖子上传文本文件，我使用的是 Delphi 2009。
比如说下面的网址
https://www.example.com/ex/exampleAPI.asmx/Process
我知道可以通过使用 TIdHttp 组件来完成。以及下面的调用
IdHttp1.Post();
但我不知道如何设置所有内容，即指定 url 并包括要发布的文件。
谢谢。
【问题讨论】：
标签： delphi file-upload http-post delphi-2009 indy
TIdHTTP 有两个重载版本的Post()，它们以文件名作为输入：
var
Response: String;
Response := IdHTTP1.Post('https://www.example.com/ex/exampleAPI.asmx/Process', 'c:\filename.txt');
.
var
Response: TStream;
Response := TMemoryStream.Create;
IdHTTP1.Post('https://www.example.com/ex/exampleAPI.asmx/Process', 'c:\filename.txt', Response);
...
Response.Free;
请注意，您要发布到 HTTPS URL，因此您需要先将启用 SSL 的 IOHandler（例如 TIdSSLIOHandlerSocketOpenSSL）分配给 TIdHTTP.IOHandler 属性。
【讨论】：
function Post(AURL: string; const ASourceFile: String{$IFDEF STRING_IS_ANSI}; ADestEncoding: TIdTextEncoding = nil{$ENDIF}): string; overload; 和 procedure Post(AURL: string; const ASourceFile: String; AResponseContent: TStream); overload;
TWebBrowser，您必须将整个文件数据存储到包含varByte 数组的Variant 中（使用VarArrayCreate() 分配Variant，然后您可以将文件数据复制到其内存块中），然后您可以将Variant 传递给TWebBrowser.Navigate() 方法的PostData 参数。不过，TWebBrowser 是一个视觉组件。它不适用于非视觉工作。不过，您可以改用 Microsoft 的 WinInet/WinHTTP API。