Фукнции для работы со строками [AnsiString]

...
#include <string.h>
...
   char * tokenPtr;
   tokenPtr = strtok(RichEdit1->Lines->Strings[i].c_str(), "\\");
   RichEdit2->Lines->Add(tokenPtr);
 
   while(tokenPtr != NULL){
       tokenPtr = strtok(NULL, "\\");
       RichEdit2->Lines->Add(tokenPtr);
      }
...

indexPtr1 = RichEdit1->Lines->Strings[i].LowerCase().AnsiPos(str1);

indexPtr2 = LastDelimiter(delim1, RichEdit1->Lines->Strings[i]);

indexPtr2 = RichEdit1->Lines->Strings[i].AnsiPos(delim2);

...
   TStringList *list = new TStringList();
   list->LoadFromFile("text.txt");
   
   for(int i = 0; i < list->Count + 10; i++)  // Прибавляю +10 так как иногда не хватает лишних проходов для замены всех пробелов.
      list->Text = StringReplace(list->Text, "  ", " ", TReplaceFlags()<<rfReplaceAll);
...

...
   list->Text = StringReplace(list->Text, "  ", "_", TReplaceFlags()<<rfReplaceAll);
   list->Text = StringReplace(list->Text, "_", "", TReplaceFlags()<<rfReplaceAll);
...

while ( s.Pos("  ") )
    s.Delete(s.Pos("  "), 1);

std::string sf[2] = { "Reg ", "ROOTKIT" };

//---------------------------------------------------------------------------
#include <sstream>
void __fastcall TForm1::Button1Click(TObject *Sender)
{
    std::string t = ".exe";
    //---------------------
    std::string s = "Reg HKLM\\SYSTEM\\ControlSet004\\Services\\ovfsthofevdqurbcfdwtquersfnxwikxvufwux\\main\\tasks\\0000000004@url [url]http://f1.catch-you.ru/files/winsetupsm.exe[/url] ";
    std::istringstream is ( s );
    while ( is >> s )
    {
        if ( s.find ( t ) != std::string::npos )
        {
            ShowMessage ( s.c_str() );
            break;
        }
    }
}
//---------------------------------------------------------------------------

//---------------------------------------------------------------------------
#include <sstream>
void __fastcall TForm1::Button1Click(TObject *Sender)
{
    std::string t = ".dll";
    //---------------------
    std::string s = "Library C:\\WINDOWS.0\\system32\\comctl32.dll:_rc_db_5.1.2600 (*** hidden *** ) @ C:\\WINDOWS\\system32\\rundll32.exe [3804] 0x10000000";
    std::istringstream is ( s );
    while ( is >> s )
    {
        if ( s.find ( t ) != std::string::npos )
        {
            s.erase(s.find ( t ) + 4, s.end() - s.begin() - 4);
            ShowMessage ( s.c_str() );
            break;
        }
    }
}
//---------------------------------------------------------------------------

...
   TStringList *TokenLibAT = new TStringList();
   TSysCharSet chAT;
   chAT<<'@';
 
   for(int i = 0; i < GeneralList->Count; i++){
      ExtractStrings(chAT, chAT, GeneralList->Strings[i].c_str(), TokenLibAT);
 
      // На выходе в TokenLibAT получаю две строки и работаю с TokenLibAT->Strings[0]
      // Strings[0] = Library C:\WINDOWS.0\system32\comctl32.dll:_rc_db_5.1.2600 (*** hidden *** )
      // Strings[1] = C:\WINDOWS\system32\rundll32.exe [3804] 0x10000000 
    }   
...

//---------------------------------------------------------------------------
#include <sstream>
void __fastcall TForm1::Button1Click(TObject *Sender)
{
    std::string t[2] = {".dll", ".manifest"};
    //---------------------
    std::string s = "File C:\WINDOWS\system32\WindowsLogon.manifest12345";
 
    std::istringstream is ( s );
    while ( is >> s )
    {
      for ( size_t i = 0; i < 2; ++i )
      if ( s.find ( t[i] ) != std::string::npos )
      {
          s.erase( s.find ( t[i] ) + t[i].length(), s.length() - s.find ( t[i] ) + t[i].length() );
          ShowMessage ( s.c_str() );
          break;
      }
    }
}
//---------------------------------------------------------------------------

...
   TStringList *temp = new TStringList();
 
   if(FileExists("LegalService.txt")){
      temp->LoadFromFile("LegalService.txt");
      ListLegalSvc->Append(temp->Text);
     }
   delete temp;
...

ListLegalSvc->SaveToFile("text.txt");

...
   TStringList *ListLegalSvc = new TStringList();
...
   TStringList *temp = new TStringList();
 
   if(FileExists("LegalService.txt")){
      temp->LoadFromFile("LegalService.txt");
      ListLegalSvc->Append(temp->Text);
      ListLegalSvc->Text = StringReplace(ListLegalSvc->Text, "\r", "", TReplaceFlags()<<rfReplaceAll);
     }
   delete temp;
...

ListLegalSvc->Count;

ListLegalSvc->Text = StringReplace(ListLegalSvc->Text, "\r", "", TReplaceFlags()<<rfReplaceAll);

if(Length(LabeledEdit3->Text)<4)

if(LabeledEdit3->Text.Length()<4)

 RichEdit1->Text=StringReplace(RichEdit1->Text,"/n","\r\n",TReplaceFlags()<<rfReplaceAll);
 RichEdit1->SelStart=RichEdit1->Text.Length();