Zeile bis zum Ende markieren in einem Text

[TonyR]

Hallo an Alle,

Folgendes Problem:

Ich möchte in einem sehr langen Text einen String suchen, im Anschluss daran möchte ich in meinem RichEdit vom ENDE des gesuchten Strings an bis zum ZEILENENDE alles markieren.

So hier (gesucht wurde "Das ist "; das Fette blaue ist markiert):
Das ist jetz mal der Text.

Suchen kann ich mit der TRichEdit-Funktion "FindText", damit bekomme ich auch den Wert zurück, den ich für den Anfang des Strings nehmen kann:SelStart:=ErgebnisDerSuchfunktion+Length(Suchstring); Wie bekomme ich es jetzt aber hin, dass das Ende der Markierung (SelLength) am Zeilenende liegt, also wo bekomme ich den Wert her (ich weis ja schließlich nicht, wie lang die Zeile hinter meinem Suchstring noch ist).

Helfen würde es mir ja schon, wenn ich irgendwie herausbekommen würde in welcher Zeile mein gesuchter String ist!

Danke schonmal im Vorraus!