Frage
Antwort
vorab: ich würde statt StringReplace/ReplaceStr/ReplaceText TStringHelper.Replace benutzen, falls deine Delphi-Version das kann.
Mehrere Ersetzungen kannst du untereinander schreiben:
s := s.Replace('Hallo', 'Welt');
s := s.Replace('Pascal', 'Delphi');
Flexibler wäre aber, das gleich in ein array zu packen wie
var
a : array[0..1, 0..1] of String = (('Hallo', 'Welt'), ('Pascal', 'Delphi'));
i : Integer;
s : String;
begin
s := 'Hallo, ich bin Pascal';
for i := Low(a) to High(a) do begin
s := s.Replace(a[i, 0], a[i,1]);
end;
end.