Поиск слова в тексте

void __fastcall TForm1::Button1Click(TObject *Sender)
{
int i,j;
for(i=0; i<=Memo1->Lines->Count; i++)
{
if(Memo1->Lines->Strings[i].Pos(Edit1->Text))
{
Label1->Caption=Memo1->Lines->Strings[i];
j=i;
}
}
for(j=i; j<=Memo1->Lines->Count; j++)
{
String x="+";
if(Memo1->Lines->Strings[j].Pos(x))
{
Label2->Caption=Memo1->Lines->Strings[j];
}
}
 
}

if( Memo1->Lines->Strings[ j ].Trim( )[1] == '+' )

    for ( int i = 0; i < Memo1->Lines->Count; ++i )
    {
        if ( Memo1->Lines->Strings[ i ].Pos( Edit1->Text ) )
        {
            Label1->Caption = Memo1->Lines->Strings[ i ];
            for ( ; ++i < Memo1->Lines->Count; )
            {
                if ( Memo1->Lines->Strings[ i ].Trim( )[ 1 ] == '+' )
                {
                    Label2->Caption = Memo1->Lines->Strings[ i ];
                    break;
                }
            }
            break;
        }
    }