用delphi 开发调用API接口程序,包含登录TOKEN
时间: 2023-05-12 18:03:26 浏览: 127
可以使用 Delphi 的 Indy 组件库来实现调用 API 接口程序,其中包含登录 TOKEN。具体实现步骤如下:
1. 使用 TIdHTTP 组件发送 HTTP 请求,设置请求的 URL 和请求方法为 POST。
2. 在请求的 Header 中添加 Authorization 字段,值为登录 TOKEN。
3. 在请求的 Body 中添加需要传递的参数,可以使用 TIdMultipartFormDataStream 组件来实现。
4. 发送请求并获取响应,可以使用 TIdHTTP.ResponseText 属性获取响应的文本内容。
以下是示例代码:
var
IdHTTP: TIdHTTP;
FormData: TIdMultipartFormDataStream;
Response: string;
begin
IdHTTP := TIdHTTP.Create(nil);
FormData := TIdMultipartFormDataStream.Create;
try
IdHTTP.Request.Method := 'POST';
IdHTTP.Request.URL := 'http://api.example.com/login';
IdHTTP.Request.CustomHeaders.Values['Authorization'] := 'Bearer ' + TOKEN;
FormData.AddFormField('username', 'user');
FormData.AddFormField('password', 'pass');
Response := IdHTTP.Post(IdHTTP.Request.URL, FormData);
finally
FormData.Free;
IdHTTP.Free;
end;
end;
注意:TOKEN 是登录时获取的令牌,需要根据实际情况进行替换。