StringReplace/de
From Lazarus 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 ausser 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;
--Olaf 06:16, 9 July 2013 (UTC)