String in Memo suchen

[Kratos]

Hallo miteinander,

Programmaufbau:

Code:

Form5 -> Memo5(TMemo), Button5(TButton)
Form6 -> Memo6(TMemo), Button6(TButton)

Meine Idee:
Das Form6.Memo6 wird zeilenweise mit Strings gefüllt.
Durch Klick auf Button6 wird der Inhalt von Memo6 nach Memo5 übertragen.
---- Bis hierhin klappt alles.

Nun soll beim Klick auf Button5 das Memo5 nach einem String durchsucht werden, verbunden durch eine Abfrage. Heißt: Wenn der String gefunden wurde, dann führe etwas aus.

Code:

procedure TForm5.Button5Click(Sender: TObject);
begin
   if ((Pos('blablabla', Memo5.Lines)) := True) then
   begin
      TuEtwas;
   end;
end;

Folgender Fehler erscheint:
E2250 Es gibt keine überladene Version von 'Pos', die man mit diesen Argumenten aufrufen kann Wenn ich die if-Zeile durch folgende ersetze, klappt es auch nicht:
if (Memo5.Lines.IndexOf('blablabla') = True) then Fehler:
E2008 Inkompatible Typen
Was mache ich falsch? Hat jemand einen Denkanstoß für mich parat?

Gruß
Kratos