TClientSocket的问题

Question

环境：window 2000 server + sp4 + delphi 7 + sqlserver 2000 ,使用控件 TClientSocket问题：程序中有个线程，判断跟服务端在一定时间内没连接，就重新连接服务端；
程序界面上有个按钮，功能也是连接服务端。如果程序跟服务端在一定时间内没连接，线程将重新连服务端，但连不上。但是如果点击界面上的“连接”按钮，
则可以连上。用线程的原因就是，实现自动连接。这是咋回事啊？

Answer 1

应该是代码上的问题,lz可以把代码贴出来看看还有,不建议在线程中控制TClientSocket对象

Answer 2

线程中发出连接之后进行一定的延时后再进行第二次连接（与服务器建立连接是要一定的时间的），否则线程将不断的进行socekt初始化，无法完成连接操作！我估计是这个问题，没调试过！呵呵。