delphi11 TNEThttprequest
时间: 2023-08-03 17:02:27 浏览: 48
在Delphi 11中,您可以使用TNetHTTPRequest组件来发送HTTP请求。TNetHTTPRequest是TNetHTTPClient的一部分,它提供了更底层的HTTP请求控制。以下是一个使用TNetHTTPRequest发送GET请求的示例代码:
```delphi
uses
System.Net.HttpClient, System.Net.URLClient;
procedure SendGetRequest(const URL: string);
var
Request: TNetHTTPRequest;
Response: IHTTPResponse;
begin
Request := TNetHTTPRequest.Create(nil);
try
Response := Request.Get(URL);
// 处理响应结果
if Response.StatusCode = 200 then
begin
// 获取响应内容
ShowMessage(Response.ContentAsString());
end
else
begin
ShowMessage('请求失败,状态码: ' + IntToStr(Response.StatusCode));
end;
finally
Request.Free;
end;
end;
```
在上述代码中,我们使用TNetHTTPRequest的Get方法发送GET请求,并通过IHTTPResponse接口访问响应对象。您可以根据需要处理响应结果,上述代码仅展示了简单的处理方式。
请注意,您需要在使用前添加`System.Net.HttpClient`和`System.Net.URLClient`单元,并确保您的项目引用了适当的库。
希望对您有帮助!如有任何问题,请随时提问。