Alle gleichen Zeichen bzw Zeichenfolgen in einer RichTextBox in eine bestimmete Farbe einfärben

Wincrash · 10. November 2012, 08:41

Hi Leute,

ich hab hab bei meinem "Projekt" noch ein kleines Problem:
Nachdem man einen Text in eine RichTextBox geschreiben oder eingefügt hat,
soll das Programm alle gleiche Zeichenfolgen, z.B. "<code>" oder "<code/>",
in eine bestimmte farbe einfärben, z.B. blau - egal wo sich diese Zeichenfolgen
befinden oder wie oft diese vorkommen

Danke
wincrash

P.S.: so etwas meine ich

xtts02 · 10. November 2012, 08:53

Mit RegEx alle 'Ausschnitte' suchen und für jeden davon per SelestionStart und SelectionLength auswählen, danach dem ausgewählten Text eine Farbe zuweisen.

Wincrash · 10. November 2012, 09:07

Tut mir Leid,
aber mit RegEx kenne ich mich noch nicht aus
kannst du mir vielleicht einen Codeschnipsel geben
oder sowas, damit ich weiß, ich ich das machen
soll?

vielen Dank,
wincrsah

Derfuhr · 10. November 2012, 09:42

Hier kannst du dich über "RegularExpressions" informieren:

msdn.microsoft.com/de-de/libra…cs-lang=vb#code-snippet-1

regenechsen.de/phpwcms/index.php?regex_dt_elemente

mfG

Derfuhr

Wincrash · 10. November 2012, 10:20

Sorry, vielleicht liegt es an der Uhrzeit,
aber ich werde daraus nicht ganz schlau

könnt ihr mir da ein beispiel geben?

sry,
wincrash

thefiloe · 10. November 2012, 10:51

Wenn ich dir nen Code gebe verstehst du Bahnhof kopierst ihn und hast null gelernt. Lies es nochmal durch und sieh zu, dass du daraus schlau wirst. Im Leben eines Programmierers ist es oft so, dass man einfach etwas auf 5 mal durchlesen muss bis man es wirklich zu 100% versteht. Also lies, google und informier dich. Nen Regex snippet nützt dir absolut rein gar nix.
lmgtfy.com/?q=.net+regex

Wincrash · 10. November 2012, 11:33

Vielen Dank trozdem an alle

wincrash

RodFromGermany · 10. November 2012, 18:59

@Wincrash: Sieh Dir mal dies an:

VB.NET-Quellcode

Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
Dim txt = "<code>"
Dim start = 0
Do
Dim index = RichTextBox1.Text.IndexOf(txt, start)
If index = -1 Then
Exit Do
End If
RichTextBox1.SelectionStart = index
RichTextBox1.SelectionLength = txt.Length
RichTextBox1.SelectionColor = Color.Red
start = index + 1
Loop
End Sub

Wincrash · 11. November 2012, 07:57

@RodFromGermany:
:thumbup:

Ja so etwas hab ich auch schon getestet, aber wie machst du das,
wenn sich der abschnitt "<code>" oft wiederholt? Ich meine, es
gibt ja kein ThirdIndexOf(...)

Danke,
wincrash

~blaze~ · 11. November 2012, 08:08

Hi
doch? Schau dir RodFromGermanys Code noch mal an: RichTextBox1.Text.IndexOf(txt, start)

Übrigens ist eine RichTexBox eher nicht geeignet für Syntax-Highlighting. Die obige Methode macht zwar, was gefordert ist, arbeitet aber langsam. Außerdem können Bilder usw. eingefügt werden und die gehören eher nicht in den Quelltext.

Gruß
~blaze~

Wincrash · 11. November 2012, 10:04

Ok, Vielen Dank an alle nochmal
@~blaze~: Ja, stimmt - die Zeile hab ich
beim durchlesen nicht richtig wahrgenommen
*FAIL*

Vielen Dank nochmal,
wincrash

RodFromGermany · 11. November 2012, 16:22

Wincrash schrieb:

aber wie machst du das,

Das Geheimnis ist die Zeile

VB.NET-Quellcode

start = index + 1

, da wird der Suchstart für das nächste IndexOf() ein Zeichen hinter den letzten "Fundort" gesetzt.

Alle gleichen Zeichen bzw Zeichenfolgen in einer RichTextBox in eine bestimmete Farbe einfärben

Alle gleichen Zeichen bzw Zeichenfolgen in einer RichTextBox in eine bestimmete Farbe einfärben

VB.NET-Quellcode

Wincrash schrieb:

VB.NET-Quellcode

Tags

Ähnliche Themen

6 Benutzer haben hier geschrieben