Вниз
Скачать: CL | DM;

IDUdp   Найти похожие ветки 

 
Dstr ©   (2006-06-10 15:45) [0]

Добрый день,у меня такая проблема:Пишу чат на IDUdp и вызывая Broadcast,каждый пакет приходит почемуто по 2 раза,например:
Вызываю
Client.Broadcast("гыгы",ServiseLokNet.GlobalServer.DefaultPort);
Обрабатываю:
procedure TServiseLokNet.GlobalServerUDPRead(Sender: TObject; AData: TStream;
 ABinding: TIdSocketHandle);
Begin;
ShowMessage("апвалп"); //ето сообщение отобразится 2 раза,почему?
End,


 
Eraser ©   (2006-06-10 16:15) [1]


> Dstr ©   (10.06.06 15:45)

потому что установлено 2 сетевых интерфейса.


 
Dstr ©   (2006-06-10 17:56) [2]


> потому что установлено 2 сетевых интерфейса.


Блин!!!Ты гений!!Я забыл что инди врезается куда тока можно,проблема решилась:надо всеголишь свою личность в чате обрабатывать локально.

Тока решение проблемы породило новую проблему(.Ведь я тупо шлю в сообщении ИПшник пользователя,а по етому ИПшнику прога знает кому слать месагу в следующий раз,но если например связаться через удаленку,как я понял фсе подвиснет в еб*нейматери.
Как можно узнать ИП адресата сообщения,класс TIdSocketHandle пишет всегда 0.0.0.0?

procedure TServiseLokNet.GlobalServerUDPRead(Sender: TObject; AData: TStream;
 ABinding: TIdSocketHandle);
begin
ShowMessage(ABinding.IP);  //вернет 0.0.0.0
end;


 
Eraser ©   (2006-06-10 23:28) [3]


> Dstr ©   (10.06.06 17:56) [2]


> ShowMessage(ABinding.IP);  //вернет 0.0.0.0

ShowMessage(ABinding.PeerIP);
;-)



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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.032 c
2-1160458972
Alina
2006-10-10 09:42
2006.10.29
Базы в Делфи.


3-1157032916
Patrick
2006-08-31 18:01
2006.10.29
Удаление всех записей


2-1159904838
mr1Andersen
2006-10-03 23:47
2006.10.29
Как сделать так что бы программа сделанная на делфи, работала вес


15-1160483356
KitsumVI
2006-10-10 16:29
2006.10.29
Исходники к книге Delphi и технология COM


1-1158687621
parasolka
2006-09-19 21:40
2006.10.29
DBGrid с нумерацией строк




   Наверх