Hallo,
ich frage mich gerade, ob Delphi von "Haus aus" eine function hat, mit der bestimmte Zeichen aus einem String entfernt werden können? Optional auch im Aufruf mehrere Zeichen, nicht nur eines?
Ich behelfe mich zur Zeit mit einer eigenen function, vielleicht wird dann auch mein Anliegen klarer:
Delphi-Quellcode:
Function RemoveChars(const sSource: String; DeleteChars: Array of Char): String;
var
i: integer;
begin
Result := sSource;
for i := Low(DeleteChars) to High(DeleteChars) do
Result := StringReplace(Result, DeleteChars[i], '', [rfReplaceAll]);
end;
Der Aufruf erfolgt dann über
Delphi-Quellcode:
var
s: String;
begin
s := 'DIES ist ein TestString. Tab-Zeichen: '#9;
s := RemoveChars(s, ['D', #9]);
// Entfernt das "D" und das Tab-Zeichen (#9) aus dem String
end;
Ja, wie gesagt: Gibt es dafür ein Bordmittel?
[edit=SirThornberry]Code-Tags durch Delphi-Tags ersetzt - nächstes mal bitte gleich die Delphi-Tags verwenden - Mfg, SirThornberry[/edit]