🚀 go-pugleaf

"Patryk B." <pbobak@no.spam.o2.pl> wrote in message
news:op.tyk0galowzezly@dune.intranet...

> It hang beacuse i delete:
>
> if (pStream->WaitForData(CLIENTWAITTIME))

You need that line in order to detect a graceful disconnect from the client.
When WaitForData() returns true, and then Read() returns 0, the connection
has been disconnected by the client.

> I want disconnect client only when server is going to shutdown.

Then simply remove the call to Close() when WaitForData() returns false, ie:

    void __fastcall TMyServerThread::ClientExecute(void)
    {
        char buffer[BUFFERSIZE];
        int iRead;

        try
        {
            TWinSocketStream *pStream = new TWinSocketStream(ClientSocket,
CLIENTWAITTIME);
            try
            {
                while( (!Terminated) && (ClientSocket->Connected) )
                {
                    if( !pStream->WaitForData(CLIENTWAITTIME) )
                        continue;

                    iRead = pStream->Read(buffer, sizeof(buffer);
                    if( iRead < 1 )
                    {
                        if( iRead == 0 )
                            // client disconnected...
                        else
                            // socket error...

                        ClientSocket->Close();
                    }
                    else
                    {
                        // process buffer up to iRead bytes...
                    }
                }
            }
            __finally
            {
                delete pStream;
            }
        }
        catch (...)
        {
            // handle exception...
        }
    }


Gambit