Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Работа с сетью в Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 05.03.2015, 08:11   #1
Anton911
Форумчанин
 
Аватар для Anton911
 
Регистрация: 23.08.2011
Сообщений: 171
Вопрос indy TCPServer список подключений

Всем привет! Постепенно пересаживаюсь с TServerSocket и TClientSocket на Indy (версия indy не знаю какая, у меня Embarcadero XE5). В общем вроде настроил подключение клиента к серверу, клиент может отправлять на сервер сообщения. А вот как с сервера отправить сообщение определенному клиенту? В прочем не важно.
Есть ли альтернатива у indy:
Код:
TServerSocket.Socket.Connections[0].SendText('Hello');
Как мне обратиться в IdTCPServer к нулевому клиенту? А к десятому?

Код:
Вот допустим приходит сообщение от клиента на сервер
procedure TForm2.IdTCPServer1Execute(AContext: TIdContext);
begin
  Client_Read(AContext, AContext.Connection.Socket.ReadLn(enUTF8));
end;
Где у TCPServer список этих AContext? И есть ли он вообще?
Каждый день узнаю новое...
Anton911 вне форума Ответить с цитированием
Старый 05.03.2015, 08:26   #2
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

Почитай про TIdCustomTCPServer.Contexts Property
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 05.03.2015, 09:14   #3
Anton911
Форумчанин
 
Аватар для Anton911
 
Регистрация: 23.08.2011
Сообщений: 171
По умолчанию

Понятно. Значит
Код:
IdTCPServer1.Contexts.LockList.Items
и есть то, что мне нужно. Items получается указатель на структуру клиента.
Получается альтернатива
Код:
TServerSocket.Socket.Connections[0].SendText('Hello');
Это:
Код:
 TIdContext(IdTCPServer1.Contexts.LockList.Items[0]).Connection.Socket.WriteLn('Hello', enUTF8);
Правильно?
Каждый день узнаю новое...
Anton911 вне форума Ответить с цитированием
Старый 05.03.2015, 12:09   #4
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

Ну я вообще-то никогда не юзал этот список, так что ты почитай хели и поэксперементируй. Я чесслово х.з.
I'm learning to live...
Stilet вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Проблемы с INDY TCPServer&Client Dremst Работа с сетью в Delphi 8 16.02.2014 21:38
TCPServer и TCPClient на indy 10, Отправка сообщения с сервара pomkalk Работа с сетью в Delphi 3 01.04.2011 11:52
Indy TCPClient, TCPServer получение списка процессов с удаленного компьютера WildWest Работа с сетью в Delphi 3 02.03.2011 08:48
Передача файлов, TCPServer & Client, Indy 10 Killbrum Общие вопросы C/C++ 3 26.09.2010 14:08
Как получить список TCP/IP подключений Lauri Общие вопросы Delphi 3 22.06.2010 01:33