TRichEdit - Mehrere Wörter markieren

[Jacques Murell]

Moin,

mittels

Delphi-Quellcode:

  RichEdit1.SetFocus;
  RichEdit1.SelStart := RichEdit1.FindText(Suchwort,0,length(RichEdit1.Text),[stMatchCase]);
  RichEdit1.SelLength := length(Suchwort);

markiere ich ein Wort in einem RichEdit.

Ich möchte aber mehrere Wörter markieren, sprich habe ich einen Text wie "Das ist ein Test" soll "Das" und "Test" markiert werden. Wie ist dies möglich?

Danke und lg

[himitsu]

Diese Selection kenn nur ein Start und ein Ende.

Eine andere Möglichkeit wäre die Hintergünde der Wörte jeweils zu färben.

[Jacques Murell]

Hm danke, das hatte ich schon befürchtet.

[Matze]

Im Endeffekt ist das auch nicht so viel komplizierter: Die jeweiligen Stellen markieren und mit SelAttributes einfärben (nacheinander). Natürlich musst du das irgendwann wieder rückgängig machen.

Dass Wörter, die nicht unmittelbar aufeinander folgen, parallel markiert werden können, wäre für mich auch nicht sinnvoll, da es kein Standardverhalten ist. Die erste Frage wäre für mich schon, was passiert, wenn man Strg+C, Entf o.ä. drückt. ;)

[-187-]

Hmm ich habe mal was ähnliches gebaut. (Syntax Highlighter)

Ich habe auch die Selections eingefärbt und mir die Positionen der Strings in einer StringList gemerkt, sodass ich sie später wieder zurückfärben konnte.

[Matze]

Wenn nicht unterschiedliche Markierungen verwendet werden (also entweder sind welche da oder nicht), könnte man auch den kompletten Text markieren und die Hintergrundfarbe zurücksetzen. Ich weiß jedoch nicht, ob das dann unschön "flackert".