Форум: "Сети";
Текущий архив: 2005.06.14;
Скачать: [xml.tar.bz2];
Внизне отрабатывает try clientsocket.Open; finally Найти похожие ветки
← →
redlord (2005-03-23 19:48) [0]всем привет
народ подскажите почему в приведенном примере,
вслучае неудачного коннекта, молчит бипер
а вот сообщение об ошибке выдается
(10061 комп отверг зпрос на подключение)
client:=Tclientsocket.Create(nil);
client.Host:="127.0.0.1";
client.Port:=80;
client.ClientType:=ctblocking;
try client.Open; finally beep; end;
← →
redlord (2005-03-23 22:46) [1]народ ну что ни кто не знает как отловить ошибку при конекте
блокированного клиента к серверу ??
← →
Alexander Panov © (2005-03-23 22:51) [2]Используй событие OnError
← →
redlord (2005-03-23 23:58) [3]TO Alexander Panov
В блокираванном режиме ONERROR ??????? :))
← →
Digitman © (2005-03-24 08:27) [4]
> молчит бипер
выкинь свой "бипер", это дилетантский способ "отладки" (тем паче под НТ), для таких целей есть полноценный встроенный отладчик
client:=Tclientsocket.Create(nil);
client.Host:="127.0.0.1";
client.Port:=80;
client.ClientType:=ctblocking;
try
client.Open;
except
on e.exception do
ShowMessage("Исключение " + e.classname + " " + e.message);
end;
← →
redlord (2005-03-24 11:36) [5]To digitman
приведенный вами код почемуто не отрабатывается
тоже. оба исключения e:exception и e:esocketerror молчат
как партизаны может в компиляторе чтото включать надо чтоб они отработали ,но в книгах которые у меня есть про ето нигде не сказано
← →
Digitman © (2005-03-24 12:59) [6]
> redlord (24.03.05 11:36) [5]
> приведенный вами код почемуто не отрабатывается
врешь ведь ...
либо сервис заведомо доступен, либо ctNonblocking ..
третьего не дано.
← →
redlord (2005-03-24 15:14) [7]to digitman
я вам на мыло исходник бросил 10кило
чтото он на отрез пахатьотказывается если он у вас отработает тогда будет совсем не смешно
← →
Digitman © (2005-03-24 15:33) [8]
> на мыло исходник бросил 10кило
мыло я твое получил, ставлю БП на строчке on e:exception do и прекрасно этот ВР ловлю, как и ожидаю.
не было никакого резона слать бестолковое мыло.
← →
redlord (2005-03-24 16:01) [9]я тоже ставил ешо до отправки мыла
и не разу туда управление небыло передано
может в компиляторе какие галки стоят или наоборот не стоят ??
← →
Digitman © (2005-03-24 16:18) [10]
> и не разу туда управление небыло передано
а хоть где-нибудь (в ином месте) ловил ВР ?
если ловил, то с галками все в порядке - тгочно так же и здесь поймаешь, как я поймал
← →
redlord (2005-03-24 22:11) [11]похоже что и правду чтото гдето отключено
потомучто ниже приведенный код без всяких
исключений (передает) данные даже при закрытом
слиентском сокете
try
//clientsocket1.Open;
for n:=1 to 100 do
begin
sleep(500);
clientsocket1.Socket.SendText("12345");
memo1.Lines.Add(inttostr(n));
application.ProcessMessages;
if n = 10 then
serversocket1.Socket.Connections[0].Close;
end;
except
on e:exception do
ShowMessage("E R R O R" + e.classname + " " + e.message);
end;
← →
Digitman © (2005-03-25 08:22) [12]
> redlord (24.03.05 22:11) [11]
не верю, что при закрытом.
попытка выполнить передачу по неактивному (не установленному на этот момент) соединению обязательно приведет к исключению, вне зависимости от режима работы гнезда - блокирующего или неблокирующего
← →
redlord (2005-03-27 01:53) [13]похоже в моей версии просто отключена возможность перехвата сообщений об ошибках как ее включить ???
← →
Virus.exe © (2005-03-27 23:26) [14]У меня примерно то же самое...Там вся фишка в том,что при запуске
кода внутри дельфи,все ошибки показываются,а конструкцииtry...except...finally...end;
не срабатывают.Ты откомпиль прогу,а потом запусти сам exe.Даю свой кабель от выделенки на отсечение,что комп бипнет...
Страницы: 1 вся ветка
Форум: "Сети";
Текущий архив: 2005.06.14;
Скачать: [xml.tar.bz2];
Память: 0.47 MB
Время: 0.036 c