TClientSocket(80分)

  • 主题发起人 主题发起人 Lotus123
  • 开始时间 开始时间
L

Lotus123

Unregistered / Unconfirmed
GUEST, unregistred user!
ClientSocket1:=TClientSocket.Creat(Nil);
Try
...
ClientSocket1.Host := ...;
ClientSocket1.Port := ...;
ClientSocket1.Open; //若服务端未启动Socket服务,将会引发异常,从而
//触发ClientSocket1.SocketError事件,如何让程序
//跳转至自定义的异常处理事件?
...
Finally
...
End;
 
在ClientSocket1.SocketError事件中raise你自己的异常处理
 
在ClientSocket1.SocketError中设置errorcode := 0;然后自己写错误处理。
 
ClientSocket1:=TClientSocket.Creat(Nil);
Try
ClientSocket1.SocketError := MyClientSocketError; //MyClientSocketError为自定 义的过程
...
 
在D7中怎么没有ClientSocket/ServerSocket控件?
 
d7用indy了。用d5吧,保证有ClientSocket/ServerSocket
 
多人接受答案了。
 
后退
顶部