🚀 go-pugleaf

Remy,

Could you have a look at this code sample and see if in your opinion I am 
approaching the problem correctly. If not could you point out where I am 
confused or wrong. I sure would appreciate it.

I would be doing this on a Non Blocking Socket.

Thanks very much

Mike



void __fastcall TStdPopWin::ClientSocket1Read(TObject *Sender,

TCustomWinSocket *Socket)

{

int Size, NbrBytesRead, TotalBytesToExtract, BytesToReceive, TotalBytesRead 
;

Size = 0 ;

 while ( true )

 {

              BytesToReceive = Socket->ReceiveLength() ;

              if ( BytesToReceive <= 0 )

             {

                    break ;

             }

            NbrBytesRead = Socket->ReceiveBuf( &Size, sizeof(int) ) ;

            if ( NbrBytesRead <=0 )

           {

                  break ;

           }

           TotalBytesToExtract = Size ;

           while ( Size > 0 )

          {

                     char *buffer = new char[ Size+1 ] ;

                     memset( buffer, 0x00, sizeof( buffer ) ) ;

                    TotalBytesRead = 0 ;


                   while ( true )

                  {

                               NbrBytesRead = Socket->ReceiveBuf( 
(char*)buffer,TotalBytesToExtract) ;


                               if ( NbrBytesRead > 0 )

                             {

                                    TotalBytesRead += NbrBytesRead ;

                                     if ( TotalBytesRead == Size )

                                   {

                                           break ;

                                    }

                                    TotalBytesToExtract -= TotalBytesRead ;

                           }

                  }

                  ..............Do Something with the data read from the 
Socket

                 delete[] buffer ;

                 break ;


          }

         // Loop around to see if anything else has arrived in the Socket 
Buffer


    }

}