Форум: "Сети";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.03.04;
Скачать: [xml.tar.bz2];




Вниз

TClientSocket (используемый внутри TServerThread.ClientExecute) не видит обрыва сессии 


Ohtori_Akio   (2001-12-15 18:20) [0]

Привет всем.
Беда такая - написал это я tcp-proxy на основе TServerSocket в stThreadBlocking. Казалось бы, чего уж проще - при попытке соединения на TServerSocket запускается тред, в нём создаётся TClientSocket, через него открывается исходящее соединение, а потом гоняются байты из входящего в исходящее и обратно.
Только вот беда - если TClientSocket ничего не передает, а соединение с удаленным сервером (например, irc :-) обрывается - TClientSocket на это никак не реагирует. Никаких событий в нём отследить не удаётся. Использую его при TClientSocket.ClientType := ctBlocking, как и положено.
Буду благодарен за советы (я прилежный чайник, поэтому нужно подробно). Есть тестовый пример, где есть проблема, но ничего лишнего - могу выслать.
Решение проблем через таймауты не устраивает.
Спасибо за внимание. :-)



Ghost_Old.   (2001-12-16 15:38) [1]

Как решить твой вопрос не знаю, но если нужно решить задачу..то можно воспользоваться..готовыми компонентами



Ohtori_Akio   (2001-12-16 17:57) [2]

Так я и пользуюсь готовыми. TClientSocket. Ещё более готовые компоненты мне не нужны - я потом с ними не реализую нужные мне вещи.



Ohtori_Akio   (2001-12-16 20:52) [3]

Я уточнил проблему на ещё более тестовом примере :-)
Суть в следующем - если я создаю TClientSocket, скажем, по клику - всё происходит замечательно, но стоит мне создать TClientSocket внутри TServerClientThread.Execute - и у меня события TClientSocket не выполняются (в том числе и столь нужный мне OnDisconnect).
Как заставить их выполняться?



nikkie   (2001-12-17 15:40) [4]

то, что ты пытаешься сделать, уже сделано в TIdMappedPort из indy.

"я потом с ними не реализую нужные мне вещи" - почему ты так думаешь?



Ohtori_Akio   (2001-12-17 17:38) [5]

Спасибо.
Ну вот потому и думаю, что не реализую - если сам не разберусь, в чём грабли.




Форум: "Сети";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.03.04;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.018 c
1-9225            ded_di                2002-02-15 11:58  2002.03.04  
Объединение ячеек в TStringGrid...


1-9243            Октябрь               2002-02-15 20:47  2002.03.04  
Extended и String?????


6-9244            rubin                 2001-12-11 11:57  2002.03.04  
Выход в интернет ч-з HTTPS Proxi


1-9149            Squall                2002-02-17 22:56  2002.03.04  
Скорость Progress Bar a!!!


1-9105            AlanB                 2002-02-15 10:36  2002.03.04  
Мастера помоте новичку.....