Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Сети";
Текущий архив: 2002.02.14;
Скачать: [xml.tar.bz2];

Вниз

Connection: Keep-Alive и TClientSocket   Найти похожие ветки 

 
eblade   (2001-11-23 11:49) [0]

Как можно не закрыть КлиентСокет после отправки первого запроса? Просто при первом я провожу аутентификацию, а на последующих должен идти сам процес обмена. А сокет закрывается...


 
Digitman   (2001-11-23 12:13) [1]

>eblade

"сокет закрывается..." - что, сам по себе ? ни с того ни с сего ? без сообщений о причинах дисконнекта ? так не бывает)

приводи код сервера и клиента.


 
eblade   (2001-11-23 17:54) [2]

По крайней мере вызывается OnDisconnect.


 
Digitman   (2001-11-24 13:56) [3]

>eblade
Если OnError при этом не возникает, это означает только одно : соединение разорвано вполне корректно, и инициатором разрыва является сервер. Сервер-то у тебя, наверно, ThreadBlocking ? И TServerClientThread.Execute, наверно, тоже не переопределял ?

Вот, посмотри, что делается в транспортном потоке сервера по-умолчанию:

procedure TServerClientThread.ClientExecute;
var
FDSet: TFDSet;
TimeVal: TTimeVal;
begin
while not Terminated and ClientSocket.Connected do
begin
FD_ZERO(FDSet);
FD_SET(ClientSocket.SocketHandle, FDSet);
TimeVal.tv_sec := 0;
TimeVal.tv_usec := 500;
if (select(0, @FDSet, nil, nil, @TimeVal) > 0) and not Terminated then
if ClientSocket.ReceiveBuf(FDSet, -1) = 0 then Break //!!!!!!!
else Synchronize(DoRead);
if (select(0, nil, @FDSet, nil, @TimeVal) > 0) and not Terminated then
Synchronize(DoWrite);
end;
end;


надеюсь, BREAK даст тебе ответ на вопрос.


 
eblade   (2001-11-24 19:50) [4]

Ух. Неплохо, буду знать на будущее.

В принципе, сервер не должен быть ThreadBlocking, поскольку им у меня является ПО веб-сайта. Надо будет проверить.



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

Форум: "Сети";
Текущий архив: 2002.02.14;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.004 c
4-42901
Anderius
2001-11-17 21:12
2002.02.14
Как насильно завершить другую программу?


3-42673
Delirium
2002-01-18 20:17
2002.02.14
MSMQ и Delphi


3-42667
Vasilii
2002-01-18 14:19
2002.02.14
Добавление новых пользователей


14-42863
petr_v_a
2001-12-26 21:58
2002.02.14
>Yuvich личное


14-42857
artur
2001-12-26 14:32
2002.02.14
delphi для windows 2000 server





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский