| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

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

ppgrachev ©   (2010-07-21 23:42:00) 

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


---

ppgrachev   (2010-07-27 18:09:00) [1]

Неа

---

Медвежонок Пятачок   (2010-07-27 12:07:00) [2]

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

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

---

Сергей М.   (2010-07-26 16:24:00) [3]

http://www.delphimaster.ru/cgi-bin/forum.pl?id=1276752299&n=4

---

ppgrachev   (2010-07-26 15:57:00) [4]

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

---

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

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

IdTCPServer1Execute(AThread: TIdPeerThread);

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

---

ppgrachev   (2010-07-26 00:05:00) [6]

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

---

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

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

---

Наверх