RichEdit: einzelne wörter färbig/fett/kursiv/...

[himitsu]

Delphi-Quellcode:

Zeile gibt die Zeile an // die Zählung beginnt bei 0

Var i, i2: Integer;

i2 := 0;
For i := 0 to Zeile - 1 do
  Inc(i2, Length(RichEdit1.Lines.Strings[i]) + 2); // entspricht i2 := i2 + Length(RichEdit1.Lines.Strings[i]) + 2;
RichEdit1.SelStart := i2;
RichEdit1.SelLength := Length(RichEdit1.Lines.Strings[Zeile]);

über RichEdit1.SelAttributes kannst du die Schrift/Farbe ändern