clientsocket的问题 ( 积分: 50 )

  • 主题发起人 主题发起人 guxlei1
  • 开始时间 开始时间
G

guxlei1

Unregistered / Unconfirmed
GUEST, unregistred user!
procedure TForm3.ClientSocket1Error(Sender: TObject;
Socket: TCustomWinSocket; ErrorEvent: TErrorEvent;
var ErrorCode: Integer);
begin
//...
end;
自己处理过错误。怎样让系统不再返回错误信息?
 
procedure TForm3.ClientSocket1Error(Sender: TObject;
Socket: TCustomWinSocket; ErrorEvent: TErrorEvent;
var ErrorCode: Integer);
begin
//...
end;
自己处理过错误。怎样让系统不再返回错误信息?
 
什么意思?说明白点!
 
ocedure TForm3.ClientSocket1Error(Sender: TObject;
Socket: TCustomWinSocket; ErrorEvent: TErrorEvent;
var ErrorCode: Integer);
begin
showmessage('连接服务器出错')
end;
这时如果客户端连接不上服务器,会显示'连接服务器出错',当点确定后还会出现另一个错误信息。我不想再显示系统默认的出错信息。要加上什么代码?
 
设置ErrorCode
 
多人接受答案了。
 

Similar threads

S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
后退
顶部