🚀 go-pugleaf

In examples I have had before on using BCB server and client components, the 
spawned server socket thread either waits for data, or transmits data.  This 
doesn't seem to aid an asynconous protocol, as depending how long you are 
prepared to wait can delay transmitting data.

Does this mean the BCB components don't cater for a fully async messaging 
system?  Are there components that do, or anything in the BCB VCL library 
that will?

Thanks

Paul

//---------------------------------------------------------------------------
//- Execute Thread
void __fastcall CMyServerThread::ClientExecute(void)
{
    // result of any operation should close the socket
    bool result = true;
    // create stream
    TWinSocketStream *pStream = new TWinSocketStream( ClientSocket, 5000 );

    try
    {
        while( (!Terminated) && (ClientSocket->Connected) )
        {
            if (result)
            {
                if( pStream->WaitForData(1000) )
                {
                    int iLength = 0;

                    result = Read(pStream, &iLength, sizeof(iLength));
                    ........