socket通信问题(100分)(100分)

J

jingjx

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-04-18

• #1

在delphi中如何使用clientSocket向多个服务器发送信息。我的做法如下：
1.使用数据集存放各服务器的ip地址和port端口值
2.把clientSocket的active属性值设为false，
3.然后更改clientSocket的host和port值为数据集中的
其中一个服务器的地址和端口值
4.把clientSocket的active值设为true，再在onconnet事件中发送信息，发送完信息后把
clientSocket的active值设为false
5.在ondisconnet事件中重复第2步骤
但是第一次都只能向一个服器发送信息，即循环执行到第二次时，onconnet事件就激活不了。

请问，问题出在哪里，或者可以使用哪些方法何使用clientSocket向多个服务器发送信息。

 

H

Highpeak

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-04-18

• #2

不会吧?
代码.........看看

 

张

张无忌

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-04-18

• #3

你的办法是可以的，你应该在OnConnected事件里写代码，发送完了以后，
Active:=false;，最好sleep()一会再次打开这个套节字

 

J

jingjx

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-04-18

• #4

请问具体在什么地方 sleep()

 

张

张无忌

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-04-19

• #5

在onError事件里sleep()

 

H

hds6400

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-04-19

• #6

你用的是异步模式吧，将方式改为非默认的属性就OK了

 

H

Hailer

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-04-19

• #7

gz