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

[TheXception]

hab ich übersehen

[Andreas Hartmann]

Hallo! Mein erstes Posting hier...

Wie kann ich bei dem angesprochenen Problem folgendes realisieren:
ich möchte den Inhalt einer bestimmten Zeile färben und/oder auf fett setzen. Es kann dabei durchaus passieren, dass 2 Zeilen den gleichen Inhalt haben. Dabei ist mir nur die Zeilennummer bekannt.

Wahrscheinlich muss ich auch über SelStart und Length gehen, nur wie bestimme ich die?

Danke für jede Antwort/jeden Code.

MfG, Andreas

[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

[Christian Seehase]

Moin Andreas,

erst einmal herzlich willkommen hier in der Delphi-PRAXiS.

Nur um der Frage vorzubeugen:

Himitsu hat immer Zeilenlänge+2 verwendet, da jede Zeile auf #13#10 (CR LF) endet, eine Zeile also real zwei Zeichen mehr belegt, als man sieht.

[Andreas Hartmann]

Danke für den Code - werde ihn gleich ausprobieren.

@Christian Seehase: Ach so, und ich dachte, #13#10 wäre in Length schon inbegriffen... Nun ja, hätte er es nicht berücksichtigt, hätte es ja keinen Unterschied gemacht, man sieht dabei ja die Formatierung nicht...

An dieser Stelle muss ich aber mal ein Lob an das Forum aussprechen - hier wird einem wirklich schnell, nett und kompetent geantwortet, wo anderswo sich beschwert wird, dass die Leute die Antworten immer fertig zum einbauen serviert haben wollen bzw. auf die Google Suche verwiesen wird oder RTFM gesagt wird. Big Thx

MfG, Andreas

[Christian Seehase]

Moin Andreas,

Zitat von Andreas Hartmann:

Nun ja, hätte er es nicht berücksichtigt, hätte es ja keinen Unterschied gemacht, man sieht dabei ja die Formatierung nicht...

Ich denke mal, das hättest Du gemerkt, denn Du wärst ohne dieses +2 nicht auf dem gewünschten Zeilenanfang gelandet.

[himitsu]

es macht schon was aus - siehe Demo - links incl. #13#10 und rechts ohne


[EDIT]
der IE ist mal wieder beim versenden der Datei vereckt - wieso macht der das manschmal

[Andreas Hartmann]

Hast recht - wieder was gelernt.

MfG, Andreas