Difference between revisions of "StringReplace/de"
From Free Pascal wiki
Jump to navigationJump to searchm |
m |
||
Line 59: | Line 59: | ||
<br> | <br> | ||
--[[User:Olaf|Olaf]] 06:16, 9 July 2013 (UTC) | --[[User:Olaf|Olaf]] 06:16, 9 July 2013 (UTC) | ||
− | [[Category: | + | [[Category:FreePascal/de]]{{AutoCategory}} |
Revision as of 08:31, 9 July 2013
│
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)