N
njhuadong
Unregistered / Unconfirmed
GUEST, unregistred user!
通讯程序代码如下：
ClientSocket1.Active := true;
myclientsockets:=twinsocketstream.Create (clientsocket1.socket,30000);
myclientsockets.WaitForData (1000);
//......将要传送的数据放入sndbuffer中
myclientsockets.write(sndbuffer,length(sndbuffer));
myclientsockets.WaitForData(1000);
myclientsockets.read(rcvbuffer,128);//将serversocket发回的数据取到rcvbuffer中
myclientsockets.Free;
ClientSocket1.Active := false;
每次执行到 myclientsockets.write(sndbuffer,length(sndbuffer)) 时，系统总是跳出CPU
调试窗口，然后就没有了响应，服务端能接收到客户端传来的数据，但无法正常返回。
以前遇到这种情况重装一下系统就可以了（重装DELPHI无效），
现在重装后很短时间内可用（WINDOWS 2000系统中所装软件有KV3000，OFFICES XP，WINRAR和DELPHI）
，很快就不可用了。请高手回答
ClientSocket1.Active := true;
myclientsockets:=twinsocketstream.Create (clientsocket1.socket,30000);
myclientsockets.WaitForData (1000);
//......将要传送的数据放入sndbuffer中
myclientsockets.write(sndbuffer,length(sndbuffer));
myclientsockets.WaitForData(1000);
myclientsockets.read(rcvbuffer,128);//将serversocket发回的数据取到rcvbuffer中
myclientsockets.Free;
ClientSocket1.Active := false;
每次执行到 myclientsockets.write(sndbuffer,length(sndbuffer)) 时，系统总是跳出CPU
调试窗口，然后就没有了响应，服务端能接收到客户端传来的数据，但无法正常返回。
以前遇到这种情况重装一下系统就可以了（重装DELPHI无效），
现在重装后很短时间内可用（WINDOWS 2000系统中所装软件有KV3000，OFFICES XP，WINRAR和DELPHI）
，很快就不可用了。请高手回答