Поиск в RichEdit

    RichEdit1->HideSelection = false;
     if (Pos(Edit1->Text,RichEdit1->Text) != 0)
     {
        RichEdit1->SelStart = RichEdit1->Text.TrimRight().Pos(Edit1->Text) - 1;
        RichEdit1->SelLength = Edit1->Text.Length() + 1;
     }
    else ShowMessage("Не найдено!");

Text.TrimRight().Pos(Edit1->Text) - 1;

TrimRight()

void __fastcall TForm6::BitBtn1Click(TObject *Sender)
{
    RichEdit1->HideSelection = false;
     if (Pos(Edit1->Text,RichEdit1->Text)!=0)
     {
        RichEdit1->SelStart = RichEdit1->Text.Pos(Edit1->Text) - 1;
        RichEdit1->SelLength=Edit1->Text.Length();
     }
    else ShowMessage("Не найдено!");
}

Pos(Edit1->Text,RichEdit1->Text)

[C++ Error] Unit1.cpp(21): E2268 Call to undefined function 'Pos'

// ...
RichEdit1->Text.Pos(Edit1->Text)
// ...

RichEdit1->HideSelection = false;
         if (RichEdit1->Text.Pos(Edit1->Text))
         {
                RichEdit1->SelStart = RichEdit1->Text.Pos(Edit1->Text) - 1;
                RichEdit1->SelLength=Edit1->Text.Length();
         }
        else ShowMessage("Не найдено!");

  int temp=RichEdit1->SelStart; //смотрим где был курсор  
  TColor cc=clBlue; //цвет выделения
  AnsiString ss="искомый набор символов";
  for (int i = 1; i <= RichEdit1->Text.Length(); i++)
  {
 
     if (RichEdit1->Text.SubString(i,ss.Length())==ss)
     {
         RichEdit1->SelStart=i;
         //ставим курсор на искомую позицию
         RichEdit1->SelStart=i-RichEdit1->Perform(EM_EXLINEFROMCHAR, 0, RichEdit1->SelStart)-1;
         //ставим на позицию снова + учитывая номер строки
         RichEdit1->SelLength=ss.Length();
         RichEdit1->SelAttributes->Color=cc;
     }
  }
  RichEdit1->SelStart=temp; //возвращаем курсор на место
  RichEdit1->SelAttributes->Color=clWindowText; //возвращаем цвет по умолчанию