如何设置TCPClient.Connect的连接TimeOut属性，高手进来！！！

Question

各位：
　　我使用ＴCPClient连接服务器5004端口，使用代码如下：
    if TcpClient1.Connect then
       connection:=1
    else
       connection:=0
    可是，当服务器故障无反应时，ＴCPClient要向其一直连接大约20Ｓ，会一直等待下去和死机没有两样，所以需要设置等待时间超时的属性，请问各位如何设置 ？
　谢谢！！！

Answer 1

TCPClient本身没有超时属性。
你可以做个5秒钟的定时器，在定时事件中检查连接有没有完成，如没有完成则主动断开连接。

Answer 2

可是，当服务器故障无反应时，ＴCPClient要向其一直连接大约20Ｓ，会一直等待下去和死机没有两样！这个时候不能简单用TTimer来计时的，主线程已经不响应了。建议另外开一个线程，才能实现计时目的。