🚀 go-pugleaf

You can easily access single bytes inside TMemoryStream, and
further make some logic by yourself.

The easiest way is to use temporary memory stream to get rid of
unnecessary "\r\n" but you still can use only (the original) one, but
with more logic involved.

This code (UNTESTED) should get rid of all "\r" or "\n", not only
sequences of them.

I's not so hard to extend the code to search for sequences only.

// UNTESTED !!! To check the code place a file "file.txt" in the
//same root where your EXE is placed, and after Button1Click, the
//second file should be created "file2.txt".

void __fastcall TForm1::Button1Click(TObject *Sender)
{
   TMemoryStream *MS_OLD = NULL;
   TMemoryStream *MS_NEW = NULL;
   try
   {
      try
      {
         MS_OLD = new TMemoryStream;
         MS_NEW = new TMemoryStream;

         MS_OLD->LoadFromFile( ExtractFilePath( ParamStr(0) ) + 
"file.txt" );

         for ( int i=0; i<MS_OLD->Size ; i++ )
         {
            if (
                 (((char*)(MS_OLD->Memory))[i] != '\r') &&
                 (((char*)(MS_OLD->Memory))[i] != '\n')
               )
            {
               MS_NEW->WriteBuffer( &((char*)(MS_OLD->Memory))[i] , 1 );
            }
         }
         MS_NEW->SaveToFile( ExtractFilePath( ParamStr(0) ) + "file2.txt" );
      }
      catch (  const Exception &e )
      {
         ShowMessage( "Error" );
      }
   }
   __finally
   {
      if ( MS_OLD )
         delete MS_OLD;
      if ( MS_NEW )
         delete MS_NEW;
   }
}


-- 
Best regards,
Vladimir Stefanovic
"xa" <pageme@ntlworld.com> wrote in message 
news:42878a87$1@newsgroups.borland.com...
>I have some html code stored in a memory stream and i need to strip out the
> "\r\n"  prior to assigning the dat afor display... can anyone show me an
> effective way of doing this please..
>
>
>