Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Вопрос насчет tcpserver a

deep.1 © (2003-04-11 12:53:00)
Я знаю, это простой вопрос, но все-таки у меня ничего не получилось. Скажите, как переслать пакет принятый сервером на все клиенты?

Polevi (2003-04-13 17:22:00) [1]
тебе надо книжки читать

deep.1 (2003-04-12 21:09:00) [2]
:) Спасибо попробую
лол... в TidTCPSERVER такого вообще нет :)
Мне надо под Indy

deep.1 (2003-04-12 21:07:00) [3]
:) Спасибо попробую

Dimok (2003-04-11 16:27:00) [4]
Попробуй так!

procedure TForm1.ServerSocket1ClientRead(Sender: TObject;
Socket: TCustomWinSocket);
var
tempstr: string;
i: integer;
begin
tempstr:=socket.ReceiveText;
for i:=0 to serversocket1.Socket.ActiveConnections do
begin
serversocket1.Socket.Connections[i].SendText(tempstr);
end;
end;

Наверх

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