Показать сообщение отдельно
  #1  
Старый 13.07.2010, 17:25
guranvir guranvir вне форума
Начинающий
 
Регистрация: 19.01.2010
Сообщения: 113
Репутация: 11
По умолчанию Чат при помощи Indy. Нет пересылки сообщений

Delphi 2010
используется:
1)idUDPClient
2)idUDPServer
Свойства:
Active:=true
Host:='89.209.234.36'
Port:=11247
Это свойства Client&Server
Вот код посылки:
Код:
idUDPClient1.Host:='89.209.234.36';
s:=nameofme+#8+Memo2.Text;
IdUDPClient1.Send(s);
Код приема данных:
Код:
procedure TForm1.IdUDPServer1UDPRead(AThread: TIdUDPListenerThread;
  AData: TBytes; ABinding: TIdSocketHandle);
  var
  s:string;
begin
 s:=pchar(Adata);
 Memo1.Lines.Add(s);
end;
До UDPServer данные не доходят
Может ли этому быть причиной внешние IP адреса?
Ответить с цитированием