🚀 go-pugleaf

What about this:

          int len = AMsg.Length();
          while(len > 0)
          {
            int sendReturn = 
Server->ServerSocket1->Socket->Connections[ii]->SendText(AnsiString(AMsg+"\n"));
            if(sendReturn == -1)
            {
                //need to wait for OnClientWrite
                while( OnClientWriteBool != true )
                {
                        Sleep(10);
                }
                OnClientWriteBool = false;
            }else
            {
                len -= sendReturn;
            }
            if( len != 0)
            {
               Sleep(10);       // allow some time for Socket to send the 
queued up data.
            }
          }

The OnClientWriteBool is turned 'true' by the OnClientWrite event.

Eric



"Remy Lebeau (TeamB)" <no.spam@no.spam.com> wrote in message 
news:4443ca2a$1@newsgroups.borland.com...
>
> "Eric Patterson" <eric.patterson@bepco.com> wrote in message
> news:44439c71$1@newsgroups.borland.com...
>
>> I check to make sure there is an active connection right before I do
>> a SendText and pass it an ansistring.
>
> Your code is not using SendText() correctly in general.  You are not 
> taking
> into account that SendText() may not send all of your data in a single
> operation, requiring you to re-call SendText() multiple times in a loop in
> order to send all of your string.  Please go to http://www.deja.com and
> search through the newsgroup archives.  Sample code has been posted many
> times before.
>
> The exception is being thrown at random times usually after running more
>> then 6 hours.  The exception that is being thrown is an invalid integer
>> exception.
>
> Do you mean that you are getting an EListError exception with a message of
> "List index out of bounds (12345)" ?  If so, then the only way that
> particular exception can occur in the code you showed is if you are 
> passing
> an incorrect index value to the Connections[] property.
>
>
> Gambit
>
>