Определение Ip адреса подключенного клиента Indy10

[Lokos]

Здравствуйте.
Пытаюсь запоминать ip адреса подключаемых клиентов делаю так

procedure TDM1.ITCPSConnect(AContext: TIdContext);
var
 i:Integer;
begin
   FormGlav.Consol.Lines.Add(DateToStr(Date)+' - '+TimeToStr(Time)+' : '+'Попытка подключения');
   for i:=1 to 5 do
      begin
         if ClientConnect[i].IP='' then
            begin
               ClientConnect[i].IP:=AContext.Binding.IP;
               ClientConnect[i].ConectBaseCreate(i);
               FormGlav.Consol.Lines.Add(DateToStr(Date)+' - '+TimeToStr(Time)+' : '+'Клиент с адресом: '+ AContext.Connection.Socket.Binding.IP);//либо AContext.Bindings.Ip
               Break;

            end
         else
            if i=5 then
               begin
                  AContext.Connection.Disconnect;
                  FormGlav.Consol.Lines.Add(DateToStr(Date)+' - '+TimeToStr(Time)+' : '+'Клиент отключен');
               end;
      end;
end;

но в Console пишется адрес на котором весит сам сервер. Почему?

[Lokos]

исправил вот так

AContext.Connections.Soket.Binding.PeerIp

Стало похоже на истину.