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

Не работает присвоение порта к IdUDPServer   Найти похожие ветки 

 
Chaser ©   (2004-12-22 13:02) [0]

Передаю данные с компьютера на компьютер при помощи IdUDPServer и IdUDPClient.

У сервера OnUDPRead пишу (ответ клиенту):

DataStringStream:=TStringStream.Create("");
try
 DataStringStream.CopyFrom(AData, AData.Size);
 if DataStringStream.DataString="xxx"
 then
  begin
   s:="Replied from ""+idUDPServer1.LocalName+"" to ""+DataStringStream.DataString+"" - Client stopped...";
   ABinding.SendTo(ABinding.PeerIP, ABinding.PeerPort, s[1], Length(s));    
  end;

Клиент и сервер соединяюся по порту 3128 например.

Проблема: если у сервера поставить на компоненте (во время разработки) порт 3128, то все работает, а если на компоненте поставить порт 1234, а потом во во время работы программы допустим при Button1.Click написать idUDPServer1.DefaultPort:=3128, то почему-то соединения нет.
А если писать OnCreate формы idUDPServer1.DefaultPort:=312, то все соединяется.

Подскажите плиз в чем проблема.
С уважением, Андрей.


 
Eraszer   (2004-12-22 20:58) [1]

Сначала отключай сервак (active:=false) потом меняй порт, потом включай сервак (active:=true)
that"s all.


 
Chaser ©   (2004-12-23 14:59) [2]

Неа, не фурычит :(
Главное, что idUDPServer1.DefaultPort становится = 3128, но соединения с сервером не происходит.
А если писать OnCreate формы idUDPServer1.DefaultPort:=3128, то все соединяется


 
Eraser ©   (2004-12-23 17:33) [3]

Странно...


 
Chaser ©   (2004-12-24 15:59) [4]

Главное, что idUDPServer1.DefaultPort становится 3128, но не соединяется с сервером.
У меня в OnCreate формы стоит idUDPServer1.Active:=true.
Если эту строку закоментировать, и менять порт по ходу работы программы, а уже потом ставить порт Active:=true, то все работает, однако если после этого опять поменять порт на другой (Active:=false, меняем порт, Active:=true), то не работает :(, хотя idUDPServer1.DefaultPort меняется.
Выходит если один раз активировать сервер, то потом уже порт не поменяешь.
Может кто знает как это исправить?



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

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



Память: 0.46 MB
Время: 0.028 c
3-1107786978
Abusss
2005-02-07 17:36
2005.03.06
ADO+фильтр


9-1102333956
Domowoi
2004-12-06 14:52
2005.03.06
Документация по PowerDraw


1-1108622745
Серж_Евдокимов
2005-02-17 09:45
2005.03.06
Кто-нить юзает JVCL? После установки ее и JCL Delphi 6 тормозит


3-1107194327
Руслана
2005-01-31 20:58
2005.03.06
Вопрос по SQL запросу


14-1108448656
syte_ser78
2005-02-15 09:24
2005.03.06
наверное уже надоевший вопрос о хостинге.




   Наверх