StringReplace/de
From Free Pascal wiki
Jump to navigationJump to search
│
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]);