teil suchen aber ganzen satz ersetzen [PLS Hilfe]

[0NyX]

So ich habe das nun so gemacht:

Delphi-Quellcode:

procedure TForm1.suchenClick(Sender: TObject);
begin

  OpenDialog.Execute;
  Richedit2.Lines.LoadfromFile(OpenDialog.Filename);
  RichEdit.Text := StringReplace(RichEdit.Text, search.Text, Richedit2.Lines.Text, [rfReplaceAll, rfIgnoreCase]);

end;

Nur leider ersetzt der bisher nur das, was ich auch in der suche eingebe (was ja auch logisch ist...), jedoch soll er den Kompletten Satz überschreiben.
Könnte mir jemand sagen wie ich dieses mache?

Vielen Dank im vorraus!