H huijunzi Unregistered / Unconfirmed GUEST, unregistred user! 2004-04-03 #1 我现在的情况是ClientSocket异常退出(比如调试时的Delphi中断)，导致服务器SocketServer报错，我不知道在哪里处理，怎样捕捉这个错误，怎样得到这个消息，然后SocketServer要做怎样的处理呢？
我现在的情况是ClientSocket异常退出(比如调试时的Delphi中断)，导致服务器SocketServer报错，我不知道在哪里处理，怎样捕捉这个错误，怎样得到这个消息，然后SocketServer要做怎样的处理呢？
H huijunzi Unregistered / Unconfirmed GUEST, unregistred user! 2004-04-03 #3 我说的是客户端异常退出服务端会立即报一个错误框，在ServerSocketClientError事件中肯定捕捉不到
怡 怡.梦 Unregistered / Unconfirmed GUEST, unregistred user! 2004-04-03 #4 oh ,sorry！！！是这样吗？ procedure Tform.ClientSocketError(Sender: TObject; Socket: TCustomWinSocket; ErrorEvent: TErrorEvent; var ErrorCode: Integer); begin Application.MessageBox(PChar('网络连接失败!! ' + IntToStr(ErrorCode)), '提示', MB_OK + MB_ICONINFORMATION); ErrorCode := 0; end;
oh ,sorry！！！是这样吗？ procedure Tform.ClientSocketError(Sender: TObject; Socket: TCustomWinSocket; ErrorEvent: TErrorEvent; var ErrorCode: Integer); begin Application.MessageBox(PChar('网络连接失败!! ' + IntToStr(ErrorCode)), '提示', MB_OK + MB_ICONINFORMATION); ErrorCode := 0; end;
怡 怡.梦 Unregistered / Unconfirmed GUEST, unregistred user! 2004-04-05 #5 http://delphibbs.com/delphibbs/dispq.asp?lid=2531229
