Einzelnen Beitrag anzeigen

Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.063 Beiträge
 
Delphi 12 Athens
 
#5

AW: In RichEdit ganze Zeile einfärben

  Alt 15. Jun 2014, 15:56
PS: Dein Code hatte auch nie das gemacht, was du scheinbar wolltest.

Erstmal werden die Zeilenumbrüche mitgezählt und dein noChars := noChars + Length(RichEdit1.Lines[i]); hat Diese vergessen.

Wenn es kein HALLO gibt, dann wird dennoch etwas markiert, denn die Repeat-Schleife prüft ja erst am Ende. Stattdessen ein While am Anfang währe bestimmt besser.



Also, entweder suchst du wirklich in der Zeile, welche grade behandelt werden soll (EM_LINEINDEX),
oder du suchst alle Texte (FindText, so ähnlich, wie du es mit Repeat+CharPos schon gemacht hast), und markierst die zugehörige Zeile (EM_LINEFROMCHAR).
Neuste Erkenntnis:
Seit Pos einen dritten Parameter hat,
wird PoSex im Delphi viel seltener praktiziert.

Geändert von himitsu (15. Jun 2014 um 16:19 Uhr)
  Mit Zitat antworten Zitat