TStringList - Delimiter - Ausmaskieren

**Keflock**

Hallo zusammen,

wenn ich eine Zeichenkette:

Test+Morgen?+2h+Verlassen

mit TStingList und dem Delimiter "+" aufteile, so bekomme ich:
Test
Morgen
2h
Verlassen

Leider gehören "Morgen" und "2h" in einer Zeile, da mit dem "?" ich das Pluszeichen vor "2h" ausmaskiere soll. Also folgend:
Test
Morgen?+2h
Verlassen

Wie geht es? Gibt es einen TStringList.MaskDelimiter?

Ich könnte es auch so implementieren:
Ergebnis := copy(text, 1, pos('+', StringReplace(StringReplace(text, '??', 'xx', [rfReplaceAll]), '?+', 'xx', [rfReplaceAll]))); aber eigentlich wollte ich TStringList verwenden.

Grüße
Kef

**alzaimar**

Eine Möglichkeit:
1. Ersetze alle '?+' durch '$$$'
2. Lese die Daten in die Stringlist ein
3. Ersetze in jeder Zeile '$$$' durch '+'

TStringList - Delimiter - Ausmaskieren

TStringList - Delimiter - Ausmaskieren

Re: TStringList - Delimiter - Ausmaskieren

Forumregeln

alzaimar (Moderator) Registriert seit: 6. Mai 2005 Ort: Berlin 4.956 Beiträge Delphi 2007 Enterprise	#2 Re: TStringList - Delimiter - Ausmaskieren 2. Nov 2008, 09:00 Eine Möglichkeit: 1. Ersetze alle '?+' durch '$$$' 2. Lese die Daten in die Stringlist ein 3. Ersetze in jeder Zeile '$$$' durch '+' "Wenn ist das Nunstruck git und Slotermeyer? Ja! Beiherhund das Oder die Flipperwaldt gersput!" (Monty Python "Joke Warefare")
	Zitat