delphi11 restrequest ExecuteAsync 超时 代码写些，第二个参数提示TProc<T>

在 Delphi 11 中，使用 `TRESTRequest.ExecuteAsync` 方法进行异步 REST 请求时，可以通过设置超时时间来控制请求的等待时间。具体的代码实现如下：

var
  Request: TRESTRequest;
begin
  Request := TRESTRequest.Create(nil);
  try
    Request.Timeout := 5000; // 设置超时时间为 5 秒
    Request.ExecuteAsync(
      procedure(Response: TRESTResponse)
      begin
        // 异步请求成功后的处理代码
      end,
      TProc<Exception>.Create(
        procedure(E: Exception)
        begin
          // 异步请求出错时的处理代码
        end
      )
    );
  finally
    Request.Free;
  end;
end;

其中，第一个参数是一个匿名方法，用于在异步请求成功后执行的处理代码；第二个参数是一个 `TProc<Exception>` 类型的匿名方法，用于在异步请求出错时执行的处理代码。设置超时时间可以使用 `Request.Timeout` 属性，单位为毫秒。在上面的代码中，超时时间被设置为 5000 毫秒（即 5 秒）。