При ошибке отсоединяются все?

← →
Hogo © (2002-11-04 20:05) [0]

Есть программа сервер, к ней присоедены несколько клиентов,
когда одного из клиентов перезагрузить или выключить на системном блоке (Reset, Power) то обрубаются все клиенты.
Кто-нибудь сталкивался с этим?

← →
Эльф © (2002-11-04 20:42) [1]

Я чат пишу, ничего такого не замечал. У меня TSocketServer и TSocketClient, а у тебя?

← →
hogo © (2002-11-04 20:50) [2]

У меня тоже TSocketServer и TSocketClient
программа работала до того момента когда я отказался от BDE, перешел на другйо способ хранения информации. Тогда и началось.

← →
Polevi © (2002-11-05 09:49) [3]

да, без BDE не будет работать

← →
igorx © (2002-11-05 11:50) [4]

Чепуха :) У меня аналогичный комплекс программ без BDE и все отлично работает.

← →
hogo © (2002-11-05 12:07) [5]

igorx, как у вас обработаны ошибки SeverSocket?

Бросаю кусок кода:

procedure TTradeForm.ServerSocketClientError(Sender: TObject;
Socket: TCustomWinSocket; ErrorEvent: TErrorEvent; var ErrorCode: Integer);
var
s:string;
begin
case ErrorEvent of
eeGeneral : s:="eeGeneral";
eeSend : s:="eeSend";
eeReceive : s:="eeReceive";
eeConnect : s:="eeConnect";
eeDisconnect : s:="eeDisconnect";
eeAccept : s:="eeAccept";
end;
WriteLog("on error "+s+"

При ошибке отсоединяются все? Найти похожие ветки