idtcpclient

[kostya67]

Подключился я к серверу. После закрытия сервера ,при проверке на подключение клиент говорит ,что подключен,но сервер та закрыли, в чем причина?

[eval]

клиенту об том стало быть не сообщили..

[kostya67]

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

[Stilet]

думал при закрытие отправлять от сервера сообщение

Ну так и делай.

[Aliens_wolfs]

Соединение не сразу разъединяется из за того, что роутер держит какое то время это соединение, проверку можно делать по ReadTimeout, то есть если в заданное время от сервера ничего нет, то будет разрыв соединения.


Более эфективно для сокетов это когда нужно чтобы сокет сам делал проверку на соелинение KeepAlive

  
uses 
WinSock ..........

function WSAIoctl(Const s: TSocket; cmd: DWORD; lpInBuffer: POINTER; dwInBufferLen:
   DWORD; 
   lpOutBuffer: POINTER; dwOutBufferLen: DWORD;
   lpdwOutBytesReturned: LPDWORD;
   lpOverLapped: POINTER;
   lpOverLappedRoutine: POINTER): Integer; stdcall; external 'WS2_32.DLL';



Function KeepAliveSocket(hSocket: TSocket):boolean;
const
SIO_KEEPALIVE_VALS = $98000004;
type
TAlive = record
 OnOff            : u_long;
 KeepAliveTime    : u_long;
 KeepAliveInterval: u_long;
 end;
var
Alive: TAlive;
Size: Integer;
begin
 Alive.onoff := 1;
 Alive.keepalivetime := 10000;
 Alive.keepaliveinterval := 1000;
 if WSAIoctl(hSocket, SIO_KEEPALIVE_VALS, @alive, sizeof(TAlive), nil, 0, @Size, NiL, NiL) = SOCKET_ERROR then
result:= false
else
result:= true;
 end;

Использовать так KeepAliveSocket(помещаешь хендел нужного сокета);