Verwende die Suchfunktion des RichEdits.
TRichEdit.FindText
Embarcadero ist blöd, hat das Richedit zerstört
und ignoriert meine Bugfixe seit Jahren.
Die haben inzwischen auf eine neuere RichEdit-Version umgestellt und RichEdit nutzt jetzt #13 als Zeilenumbruch.
Embarcadero wandelt das aber in #13#10 um, allerdings nicht bei SelStart und SelLength, wo die Positionsangaben immernoch auf #13 bezogen und somit je Zeile um 1 Zeichen verschoben sind.