Отсылать сообщение по сокету всем кто в сети - Работа с сетью в Delphi

KoBRaAndrey · 09.11.2009, 00:50

ServerSocket1.Socket.Connections[0].sendtext(memo1.text);
Как отсылать всем кто в сети?

Пепел Феникса · 09.11.2009, 02:11

Код:

ServerSocket.Socket.ActiveConnections

это кол-во активный соединений...понятно как цикл сделать?)

KoBRaAndrey · 09.11.2009, 12:55

Нет, циклы я не умею(или я не понял что ето))) Покажите пример.

Пепел Феникса · 09.11.2009, 13:02

Код:

for i:=0 to ServerSocket.Socket.ActiveConnections-1 do ServerSocket1.Socket.Connections[i].sendtext(memo1.text);

не помню насчет нулевого сокета...помоему это сам сервер
не уверен на основе того что(-1) это последний сокет

KoBRaAndrey · 09.11.2009, 13:11

0 ето первый юзер
ServerSocket.Socket.ActiveConnectio ns несуществует такой команды о_О

ы, там 1 не стояло в конце сервер сокет, ща проверю

Спасибо, работает!

09.11.2009, 00:50	#1
KoBRaAndrey Форумчанин Регистрация: 01.10.2009 Сообщений: 302	Отсылать сообщение по сокету всем кто в сети ServerSocket1.Socket.Connections[0].sendtext(memo1.text); Как отсылать всем кто в сети?

09.11.2009, 02:11	#2
Пепел Феникса Старожил Регистрация: 28.01.2009 Сообщений: 21,000	Код: `ServerSocket.Socket.ActiveConnections` это кол-во активный соединений...понятно как цикл сделать?) Хорошо поставленный вопрос это уже половина ответа. \| Каков вопрос, таков ответ. Программа делает то что написал программист, а не то что он хотел. Функции/утилиты ждут в параметрах то что им надо, а не то что вы хотите.

09.11.2009, 13:02	#4
Пепел Феникса Старожил Регистрация: 28.01.2009 Сообщений: 21,000	Код: `for i:=0 to ServerSocket.Socket.ActiveConnections-1 do ServerSocket1.Socket.Connections[i].sendtext(memo1.text);` не помню насчет нулевого сокета...помоему это сам сервер не уверен на основе того что(-1) это последний сокет Хорошо поставленный вопрос это уже половина ответа. \| Каков вопрос, таков ответ. Программа делает то что написал программист, а не то что он хотел. Функции/утилиты ждут в параметрах то что им надо, а не то что вы хотите.

09.11.2009, 13:11	#5
KoBRaAndrey Форумчанин Регистрация: 01.10.2009 Сообщений: 302	0 ето первый юзер ServerSocket.Socket.ActiveConnectio ns несуществует такой команды о_О ы, там 1 не стояло в конце сервер сокет, ща проверю Спасибо, работает! Последний раз редактировалось mihali4; 09.11.2009 в 15:04.

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Как отсылать TCP запросы?	TwiX	Общие вопросы Delphi	7	31.07.2009 17:49
Всем, кто программирует ради удовольствия	sandy	Gamedev - cоздание игр: Unity, OpenGL, DirectX	1	11.05.2008 21:58
Всем кто использует BASS (мультимедиа)	MusicMan	Помощь студентам	1	27.04.2008 10:56

09.11.2009, 12:55	#3
KoBRaAndrey Форумчанин Регистрация: 01.10.2009 Сообщений: 302	Нет, циклы я не умею(или я не понял что ето))) Покажите пример.