一个socket连结的小问题(20分)

C

caoliu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-19

• #1

一个server端,一个client端
我在client端的TForm1.ClientSocket1Connect事件中写已下代码:
if Clientsocket1.Socket.Connected=true then
begin
messagedlg('Link is connect!',mtConfirmation,[mbok],0);
BitBtn2.Enabled:=true ;
end
else
messagedlg('Link is disconnect!',mtConfirmation,[mbok],0);
clientsocket1.close;
验证是否连结上,弹出的对话框是'link is connect',server端的listbox1中也显示了client端的IP;
但是点弹出的对话框是'link is connect'的按纽后,弹出
'Asynchronous socket error 10053'信息,怎么回是?

 

C

commons_sheng

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-19

• #2

这时你已经断开了链接，它会执行OnClientError事件，你把参数ErrorCode置0就不会出现
了

 

C

caoliu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-19

• #3

server端 or client端
具体怎么写OnClientError?

 

C

commons_sheng

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-19

• #4

Server端，选中Form上的Server控件，你在Object Inspect中的Events里面可以找到
OnClientError事件

 

C

caoliu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-19

• #5

具体怎么写

 

C

caoliu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-19

• #6

是不是在TForm1.ServerSocket1ClientError中写:
Errorcode:=0;
可是这样server端的listbox1中抓不到client端的IP;
弹出'Asynchronous socket error [red]10061[/red]'信息

 

B

boyface

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-19

• #7

原来如此啊。

 

C

caoliu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-21

• #8

接受答案了.