Delphi IdFTP[3] TIdFTP.Connect、IdFTP.ReadTimeout

Delphi IdFTP[3] TIdFTP.Connect、IdFTP.ReadTimeout - 连接和超时的解读

1、TIdFTP.Connect - 打开与FTP服务器的连接。

原型：

procedure Connect(AAutoLogin: boolean = True; const ATimeout: Integer = IdTimeoutDefault); reintroduce;

procedure TIdFTP.Connect(AAutoLogin: boolean = True; const ATimeout: Integer = IdTimeoutDefault); 
var
  TmpHost: String;
  TmpPort: Integer;
begin
  try
    //APR 011216: proxy support
    TmpHost:=FHost;
    TmpPort:=FPort;
    try
      if (ProxySettings.ProxyType > fpcmNone) and (Length(ProxySettings.Host) > 0) then begin
        FHost := ProxySettings.Host;
        FPort := ProxySettings.Port;
      end;
      inherited Connect(ATimeout);
    finally
      FHost := TmpHost;
      FPort := TmpPort;
    end;//tryf
    GetResponse([220]);
    Greeting.Assign(LastCmdResult);
    if AAutoLogin then begin
      Login;
      DoAfterLogin;
      SendTransferType;
      // OpenVMS 7.1 replies with 200 instead of 215 - What does the RFC say about this?
      if SendCmd('SYST', [200, 215, 500]) = 500 then begin  {Do not translate}
        FSystemDesc := RSFTPUnknownHost;
      end else begin
        FSystemDesc := LastCmdResult.Text[0];
      end;
      DoStatus(ftpReady, [RSFTPStatusReady]);
    end;
  except
    Disconnect;
    raise;
  end;
end;

参数：

• AAutoLogin: boolean = True   //连接时登录用户。默认值为True。　　
• Timeout: Integer = IdTimeoutDefault   //IdTimeoutDefault是一个常量整数值(默认-1)，指示在启动连接、读取或写入远程计算机系统的方法中应使用默认超时值。IdTimeoutDefault通常用作提供给 TIdTCPClient.Connect方法的超时参数的默认值。

描述：

• Connect是使用主机和端口属性打开到FTP服务器的连接的过程。当需要代理服务器连接时，Connect将尝试使用ProxySettings中主机和端口属性的值，但如果发生异常，Connect将恢复为原始主机和端口值。Connect调用继承的Connect方法来打开连接的物理套接字句柄。
• 当服务器的协议响应代码为220时，LastCmdResult中的值将分配给Greeting属性。
• 当AutoLogin为True时，Connect方法将使用Login方法对连接进行身份验证，并触发OnAfterLogin事件处理程序。Connect还发送新连接的TransferType，并发送FTP SYST命令以获取存储在SystemDesc中的主机FTP服务器。
• 成功完成上述步骤后，Connect使用ftpReady状态值触发OnStatus事件处理程序。如果在Connect中引发异常，则Connect调用Disconnect并重新引发应用程序异常处理程序的异常。

2、IdFTP.ReadTimeout - 指示等待可读连接的毫秒数。

• ReadTimeout是一个整数属性，指示连接应等待对等连接使用协议堆栈变得可读的毫秒数。
• ReadTimeout在ReadFromStack中使用。
• IdFTP.ReadTimeout 实际继承自 TIdTCPConnection.ReadTimeout 

注意（个人经验和理解）：

• 以上FTP连接的等待时间，如果只设置connect 的 Timeout 实际无效果，还要设置 ReadTimeout 的值
• Connect的Timeout 是相对于网络连接通畅的情况下，判断与服务器的连接所用的超时时间。
• ReadTimeout 是相对于客户端而言，读取的超时时间，即使网络不通畅的情况下照常判断。
• 如果不设置 ReadTimeout  则FTP的连接Connect 将会是 很长时间，大概30s左右（有时候更久）才会抛出异常，因为它本身的连接是阻塞式的。

创建时间：2021.09.15　　更新时间：