idtcpserver как разослать сообщение всем клиентам

← →
ppgrachev © (2010-07-21 23:42) [0]

Написал простой чат для сети
но не получаеться разослать полученое сообщения от одного клиента всем(присылается только ему)
Что вы можете посоветоватьprocedure TForm1.IdTCPServer1Execute(AThread: TIdPeerThread); var s:string; begin s:=AThread.Connection.readln; AThread.Connection.writeln(s) edit1.text:=""; memo1.Lines.Append(s); end;

← →
Медвежонок Пятачок © (2010-07-22 13:02) [1]

посылаешь одному - вот и "присылается" только одному.
посоветуем тебе посылать всем, если хочешь, что бы получили все.

← →
ppgrachev © (2010-07-26 00:05) [2]

Как всем послать

← →
Медвежонок Пятачок © (2010-07-26 10:21) [3]

всем - это когда не только конкретному AThread"у:

IdTCPServer1Execute(AThread: TIdPeerThread);

а всем активным средам сервера.

← →
ppgrachev © (2010-07-26 15:57) [4]

ну а как все активным то

← →
Сергей М. © (2010-07-26 16:24) [5]

http://delphimaster.net/view/6-1276752299/

ну а как все активным то

всем - это значит каждому.
берешь список всех и засылаешь каждому. ферштейн?

Неа

idtcpserver как разослать сообщение всем клиентам Найти похожие ветки