如何判断NMFTP不能连接，并中断连接?谢谢！

Question

当用控件‘NMFTP’连接时，用了以下语句：
  NMFTP1.Host := HostTxt.Text;              //网址或IP
  NMFTP1.Port := StrToInt(PortTxt.Text);    //端口
  NMFTP1.Timeout := 5000;
  NMFTP1.UserID := UserTxt.Text;            //用户名
  NMFTP1.Password := PassTxt.Text;          //用户密码
  try
    NMFTP1.Connect;
   except          
   On E:Exception do  writeln(E.message);
   end; 请问当由于各种原因(例如：没有联网时)不能连接时，如何给出提示并中断连接？
当用上面语句时好像不能执行EXCEPT后的语句，而是报错：...Host Lookup Timed Out...;当将NMFTP1.Timeout 设为0时，报错：...Host Lookup Field...         。请帮助！

Answer 1

NMFTP1.Connect;出错自然联接不上，也不用中断联接
脱离delphi环境后就不会有这些提示了，而直接调用writeln(E.message);