有关Socket组件使用的问题(50分)

D

Dragoon

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-15

• #1

请问用ServerSocket与多个client连接后，如何获得与client端一一对应连接的Socket。
是ServerSocket组件的Socket属性么？

 

H

hunyuan

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-15

• #2

关注！会不会是用这种方法
ServerSocket1.Socket.Connections[0].……
这是建一个连接就增加一个吧，0，1，2
但是具体如何做呢？

 

D

Dragoon

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-15

• #3

我想问问ServerSocket1.Socket.Connections[0]中的是一个Socket的实例吗？还是别的什么？
我想将每个客户端传了的数据分别放到对应的一个缓冲区，应如何用ServerSocekt实现呢？
多谢了。

代码:

 

战

战鹰

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-15

• #4

var
Cli:TWsocketClient;
i:integer
begin
for i:=0 to WsocketServer1.ClientCount-1 do
begin
Cli:=WsocketServer1.Client;
Cli.......
end;
end;
或
procedure TForm1.WSocketServer1ClientConnect(Sender: TObject; Client: TWSocketClient; Error: Word);
procedure TForm1.WSocketServer1ClientCreate(Sender: TObject; Client: TWSocketClient);
procedure TForm1.WSocketServer1ClientDisconnect(Sender: TObject; Client: TWSocketClient; Error: Word);

 

D

Dragoon

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-16

• #5

多谢。[]