🚀 go-pugleaf

viv wrote:

> Hello james,
> How are you?
> 
> then it should be converted to html as follows:
> 
> <html>
> <head>
> <title></title>
> </head>
> <body>
> <p>Hello james,</p>
> <p>How are you?</p>
> </body>
> </html>

So you want every line to be in a paragraph tag.
Put all text in a TStringList and then add the
tag's for every line:

void __fastcall TForm1::Button1Click(TObject *Sender)
{
   AnsiString Text = "Hello james,\r\n"
                     "How are you?\r\n";


   TStringList *StringList = new TStringList;

   StringList->Text = Text;

   int nr = -1;

   while ( ++nr < StringList->Count )
      StringList->Strings[nr] = "<p>" + StringList->Strings[nr] + "</p> ";


  // Now add the relevant htmlcode before and after

   StringList->Text =
      "<html>\r\n"
      "<head>\r\n"
      "<title></title>\r\n"
      "</head>\r\n"
      "<body>\r\n"
      + StringList->Text
      + "</body>\r\n"
        "</html>";

   ShowMessage ( StringList->Text );

   delete StringList;
}

Hans.