Поиск в текстовом файле

std::auto_ptr< TStringList > text( new TStringList( ) );
 
text->LoadFromFile( "text_file.txt" );
stringgrid->RowCount = text->Count + 1;
stringgrid->ColCount = 4;
for( size_t i( 0 ), count( text->Count ); i < count; ++i )
{
    if( text->Strings[ i ].Pos( "Рубцов" ) )
    {
        stringgrid->Rows[ i + 1 ]->DelimitedText = text->Strings[ i ];
    }
}

void __fastcall TForm1::Button1Click(TObject *Sender)
{
TStringList *SL=new TStringList;
SL->LoadFromFile("C:\\1.txt");
for (int i=0; i<SL->Count; i++)
{
if(SL->Strings[i].Pos("1")==1)
{
ot=i;
}
if(SL->Strings[i].Pos("2")==1)
{
da=i;
}
}
while (ot!=da)
{
Memo1->Lines->Add(SL->Strings[ot]);
ot++;
}
}

#include <vcl.h>
#pragma hdrstop
 
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
int ot=0;
int da=0;

...
bool b = false;
...
void __fastcall TForm4::FormCreate(TObject *Sender)
{
  Memo1->Lines->LoadFromFile("111.txt");
}
//---------------------------------------------------------------------------
void __fastcall TForm4::Button1Click(TObject *Sender)
{
  Memo2->Lines->Clear();
  TStringList *SL=new TStringList;
  SL->LoadFromFile("111.txt");
  for (int i=0; i<SL->Count; i++)
   {
     if(SL->Strings[i].Pos(Edit1->Text))
      {
        b = true;
        Memo2->Lines->Add(SL->Strings[i]);
        i++;
      }
     if(b && SL->Strings[i].Pos("."))
      {
        b = false;
        break;
      }
     if(b) Memo2->Lines->Add(SL->Strings[i]);
   }
  delete SL;
}