[Gelöst] Einzelne Zeile farbig im JvRichEdit

[eddy]

Hallo Neuni,

ich habe es mal ausprobiert:

Delphi-Quellcode:

procedure TFAuf.SpeedButton4Click(Sender: TObject);
const
  crlf  = chr($0D) + chr($0A); // #13#10
begin
  s := rtfpp.Text;
  i := Pos(crlf, s);
  if i > 0 then begin
    rtfpp.SelStart := i +1;            // <-- hier hatte ich +2 erwartet     
    s := copy(s, i +1, length(s));
    i := Pos(crlf, s);
    if i = 0
      then rtfpp.SelLength := length(s)
      else rtfpp.SelLength := i;
    rtfpp.SelAttributes.Color := clBlue;
  end;
end;

Mit dem obigen Code wird die 2. Zeile auf Farbe Blau gesetzt und komplett fett geschrieben.
Damit wäre Dein Problem wohl gelöst, Du mußt Dir nur überlegen, wie Du die Stelle findest, die Du vom Programm aus ändern willst. Soll eine ganze Zeile markiert (= geändert) werden, dann mußt Du das ganze bloß noch in eine entsprechende Schleife verpacken.

mfg
eddy