socketserver的问题？ ( 积分: 50 )

guxlei · 2005-07-01

serversocket连接很多客户端。怎样向某一个客户端发送信息？

guxlei · 2005-07-01

serversocket连接很多客户端。怎样向某一个客户端发送信息？

sunzhanhui · 2005-08-28

根据连接者的port号区分

xianguo · 2005-08-28

各个客户端建立的Socket都不同

sbzldlb · 2005-08-28

socket是不同的

sbzldlb · 2005-08-28

http://www.2ccc.com/article.asp?articleid=2274

saiyue · 2005-08-28

根据连接者的port号区分,每个端口都可以不一样区别

litian · 2005-09-09

顶上去，，能否说的详细，

初学者1号 · 2005-09-09

楼主的问题就有毛病，一般情况下，都是client先连接到server的，不会出现server去连client的。clientSocket连到serverSocket的时候，有一个socket参数。
你在server端把client的socket保存起来，要向client发信息的时候，就用这个socket就行了的。这我用过多次了，肯定没问题的.

stlont · 2005-09-09

ServerSocket.Socket.Connections 存放了连接的client socket，不需要自己去保存，ActiveConnections是连接的client数目。
至于“根据连接者的port号区分”不知说的什么，监听port都用的同一个。
示范代码如下：

with ServerSocket.Socket do
for i:=0 to ActiveConnections-1 do
begin
// Memo2.Lines.Add('ActiveConnections : ' + inttostr(ActiveConnections) );
Memo2.Lines.Add('send : '
+ ' --> ' + connections.RemoteAddress
+ '('+ connections.Remotehost+')'
+ ' Client[' + inttostr(i+1) + '] ' );
Connections.SendText('hello');
end

笑江横 · 2005-09-10

客户端登陆连接后，记录下他的Socket.SocketHandle，发送的时候，用
procedure TForm1.btnOneSendClick(Sender: TObject);
var
ID:Integer;
Socket:TCustomWinSocket;
begin
if Combox1.Text='' then
exit;
ID:=strtoint(Combox1.text);
//用已有的Socket句柄建立socket对象
Socket:=TCustomWinSocket.Create(ID);
Socket.SendText(EdtSend.text);
end;

litian · 2005-09-10

初学者1号, 笑江横,stlont,三位大侠，解决了我困惑的问题！到这里拿分！？！

http://www.delphibbs.com/delphibbs/dispq.asp?lid=3190590

socketserver的问题？ ( 积分: 50 )

guxlei

Unregistered / Unconfirmed

guxlei

Unregistered / Unconfirmed

sunzhanhui

Unregistered / Unconfirmed

xianguo

Unregistered / Unconfirmed

sbzldlb

Unregistered / Unconfirmed

sbzldlb

Unregistered / Unconfirmed

saiyue

Unregistered / Unconfirmed

litian

Unregistered / Unconfirmed

初学者1号

Unregistered / Unconfirmed

stlont

Unregistered / Unconfirmed

笑江横

Unregistered / Unconfirmed

litian

Unregistered / Unconfirmed

Similar threads