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

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

Как получить IP клиента? [D6, D7, Win95/98, WinME, NT4, Win2k, WinXP]


shu_3d ©   (2003-03-13 15:13:00) 

Приветствую!
Вот такая вот простая проблемка:
делается приложение-сервер с IDTCPServer. Необходимо в OnConnect (да и в некоторых других местах) получить IP-адрес пытающегося подконнектится клиента, и, например, запретить подключение при некоторых условиях. Как это можно сделать? Используется Delphi7 с Indy 9.
Спасибо.


mrcat   (2003-03-13 19:01:00) [1]

Чего тут непонятного:

var
мой_айпи: shortstring;
...
begin
...
мой_айпи := AThread.Connection.Socket.Binding.IP;
...
end;


Обрабатывается в [ OnConnect] на сервере.


shu_3d   (2003-03-13 18:44:00) [2]

Это еще что за bind?
Если имеется ввиду tidtcpserver.bindings, то оно к клиенту не имеет никакого отношения


mrcat   (2003-03-13 16:00:00) [3]

*.bind.ip


Наверх

Титульная страница Поиск, карта сайта Написать письмо