相关疑难解决方法(0)

我怎样才能检查特定响应代码的目标URL,如200 OK,而Indy不会抛出各种异常.ConnectionTimeout,ConnectionClosedGracefully等......

例如,如果URL不正确或无法找到或无法访问其主机.即使我试图忽略它们,Indy仍然会出现异常.

所以我的问题是如何正确地忽略这些异常.

我很难知道如何访问 Indy POST 请求的响应。我将数据作为 JSON 或参数字符串发布。我使用 JSON 时的代码如下。

params := TStringList.Create;
try
  params.Text :=
    '{'
    + format ('"client_secret":"%s",', [FilesFrm.ClientSecret])
    + format ('"client_id":"%s",', [FilesFrm.ClientId])
    + '"grant_type":"authorization_code",'
    + '"redirect_uri":"http://localhost:8080",'
    + format ('"code":"%s"', [fCode])
    + '}';
  idLogFile1.Active := true;
  // Make sure it uses HTTP 1.1, not 1.0
  IdHTTP1.HTTPOptions := IdHTTP1.HTTPOptions + [hoKeepOrigProtocol];
  IdHTTP1.Request.ContentType := 'application/json';
  IdHttp1.Request.Accept := 'application/vnd.hmrc.1.0+json';

  try
    result := IdHTTP1.Post (
      'https://test-api.service.hmrc.gov.uk/oauth/token',
      params);
  except
    on E: Exception do
    memo1.lines.add (E.ClassName + ': ' + E.message);
    end;

  memo1.Lines.add (result);
  memo1.Lines.add (idHTTP1.ResponseText); …