Delphi-PRAXiS
Seite 2 von 2     12   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi RichEdit: einzelne wörter färbig/fett/kursiv/... (https://www.delphipraxis.net/20063-richedit-einzelne-woerter-faerbig-fett-kursiv.html)

TheXception 13. Apr 2004 12:26

Re: RichEdit: einzelne wörter färbig/fett/kursiv/...
 
:oops: hab ich übersehen

Andreas Hartmann 20. Apr 2004 15:57

Re: RichEdit: einzelne wörter färbig/fett/kursiv/...
 
Hallo! Mein erstes Posting hier... :-D

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 20. Apr 2004 16:20

Re: RichEdit: einzelne wörter färbig/fett/kursiv/...
 
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 20. Apr 2004 16:23

Re: RichEdit: einzelne wörter färbig/fett/kursiv/...
 
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 20. Apr 2004 16:52

Re: RichEdit: einzelne wörter färbig/fett/kursiv/...
 
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 :mrgreen:

MfG, Andreas

Christian Seehase 20. Apr 2004 16:54

Re: RichEdit: einzelne wörter färbig/fett/kursiv/...
 
Moin Andreas,

Zitat:

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 20. Apr 2004 17:12

Re: RichEdit: einzelne wörter färbig/fett/kursiv/...
 
Liste der Anhänge anzeigen (Anzahl: 1)
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 20. Apr 2004 18:49

Re: RichEdit: einzelne wörter färbig/fett/kursiv/...
 
Hast recht - wieder was gelernt. :thuimb:

MfG, Andreas


Alle Zeitangaben in WEZ +1. Es ist jetzt 17:42 Uhr.
Seite 2 von 2     12   

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz