Socket Error 恳请各位高手帮忙！(0分)

本人正在做一个实时监控程序，Client端每隔10秒测试是否与Server端连接，如果没连接，
就Try ClientSocket.Active := True,实际条件是没有连接，
本人得到的信息是SocketError=10061或SocketError=10060，一直持续五、六个小时之后，
又弹出“Windows socket error: 当该操作在进行中，由于保持活动的操作检测到一个故障，
该连接中断。 (10055), on API 'connect'”错误，此时程序就退出或死在这里。
恳请各位高手帮忙！

看一下：
http://www.delphibbs.com/delphibbs/dispq.asp?LID=1100777

谢谢mywyn,我是最近才来大富翁论坛的，所以还没有来得及仔细看以前的帖子。