Как узнать IP клиента?

[SlippyK]

Есть сервер и клиент на Delphi 7 с использованием TServerSocket1 и TClientSocket1...мне нужно чтобы на сервере в Memo отражался IP клиента, который к нему подключился.

По возможности прошу поподробнее объяснять что где прописывается если вам не сложно...

[SlippyK]

racer-loser@mail.ru - можете и сюда отвечать )

[Terran]

Procedure TForm1.ServerSocket1ClientConnect(Sender: TObject;
Socket: TCustomWinSocket);
Begin
Memo1.Lines.Add(Socket.RemoteAddress);
{Или
Memo1.Lines.Add(ServerSocket1.Socket.Connections[0].RemoteAddress);  }
End;