Difference between revisions of "StringReplace/de"
From Lazarus wiki
Jump to navigationJump to searchm (Fixed syntax highlighting; deleted category included in page template) |
|||
Line 26: | Line 26: | ||
=Anwendungsbeispiele= | =Anwendungsbeispiele= | ||
− | Beispiel 1 | + | ==Beispiel 1== |
+ | Entfernt alle Steuerzeichen aus einem String: | ||
<syntaxhighlight lang=pascal> | <syntaxhighlight lang=pascal> | ||
Line 43: | Line 44: | ||
</syntaxhighlight> | </syntaxhighlight> | ||
− | Beispiel 2 | + | ==Beispiel 2== |
+ | Entfernt alle Steuerzeichen außer dem Steuerzeichen Tab aus einem String: | ||
<syntaxhighlight lang=pascal> | <syntaxhighlight lang=pascal> | ||
Line 62: | Line 64: | ||
end; | end; | ||
+ | </syntaxhighlight> | ||
+ | |||
+ | ==Beispiel 3== | ||
+ | Ignoriert Gross und Kleinschreiben in der Source. | ||
+ | |||
+ | <syntaxhighlight lang=pascal> | ||
+ | var | ||
+ | s: String; | ||
+ | begin | ||
+ | ... | ||
+ | s:= StringReplace(s, 'CbA', 'AbC', [rfReplaceAll, rfIgnoreCase]); | ||
</syntaxhighlight> | </syntaxhighlight> |
Latest revision as of 14:44, 8 April 2020
│
Deutsch (de) │
StringReplace
Flags:
Flag | Wert |
---|---|
rfReplaceAll | 0 |
rfIgnoreCase | 1 |
Syntax:
Neuerstring := StringReplace(Originalstring,
String oder Zeichen das ersetzt werden soll,
String oder Zeichen, das stattdessen eingefügt werden soll,
Ein Flag oder beide Flags in eckigen Klammern);
Anwendungsbeispiele
Beispiel 1
Entfernt alle Steuerzeichen aus einem String:
function funAlleSteuerzeichenEntfernen(strUebergabe: string): string;
var
wrdI: word;
begin
Result := strUebergabe;
for wrdI := 0 to 31 do
Result := StringReplace(Result, Chr(wrdI), '', [rfReplaceAll]);
end;
Beispiel 2
Entfernt alle Steuerzeichen außer dem Steuerzeichen Tab aus einem String:
function funAlleSteuerzeichenAusserTabEntfernen(strUebergabe: string): string;
var
wrdI: word;
begin
Result := strUebergabe;
for wrdI := 0 to 31 do
begin
if wrdI = 9 then // filtert auf das Tabzeichen #9
continue; // springt direkt zum Schleifenkopf
Result := StringReplace(Result, Chr(wrdI), '', [rfReplaceAll]);
end;
end;
Beispiel 3
Ignoriert Gross und Kleinschreiben in der Source.
var
s: String;
begin
...
s:= StringReplace(s, 'CbA', 'AbC', [rfReplaceAll, rfIgnoreCase]);