Текущий архив: 2005.12.18;
Скачать: CL | DM;

Вниз

IP адрес   Найти похожие ветки 

← →
Signate ©   (2005-09-07 16:43) [0]

что то я совсем торможу...

есть

procedure TServerFrmMain.ServerConnect(AThread: TIdPeerThread);
var
ip: string;
begin
ip := AThread.Что тут дальше чтобы узнать IP подклчившегося?

end;

---

← →
Signate ©   (2005-09-07 17:01) [1]

вопрос решил

ip = AThread.Connection.Socket.Binding.PeerIP

в 9-тых инди

---

Страницы: 1 вся ветка

Текущий архив: 2005.12.18;
Скачать: CL | DM;

Наверх

Память: 0.46 MB
Время: 0.047 c