用Winsock通讯，当TServerSocket组件忽然中断后，怎么自动重新连接TClientSocket？(40分)

D

duanyu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-09-29

• #1

用Winsock通讯，当TServerSocket组件忽然中断后，怎么自动重新连接TClientSocket？

 

D

duanyu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-09-29

• #2

请高手指点

 

B

boyface

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-09-29

• #3

好像是不可以的。

 

呆

呆非4

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-09-29

• #4

没办法。
应该由客户端来侦测服务端是否断开。
如果断了，客户端主动连接。

 

D

duanyu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-09-29

• #5

to 呆非4，
但有两种情况：一，服务器断开时主动告诉客户端；二，客户端查询服务器端是否已断开

 

P

pingbaoshi

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-09-29

• #6

用iimer控件
procedure TForm1.Timer1Timer(Sender: TObject);
begin
Timer1.Interval:=3000; //定时器,3秒钟间隔
Timer1.Enabled:=False;
if ClientSocket.Active then ClientSocket.Active := False;

if Length(Server) > 0 then
with ClientSocket do
begin
Host := Server;
Active := True;

end;
Timer1.Enabled:=True;
end;

 

W

wjiachun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-03-10

• #7

接受答案了.