Ergebnis der Suchanfrage

• Forum: Object-Pascal / Delphi-Language

  Re: PCHarReplace

    Delphi
    by Manne, 10. Dez 2004
  Nicht getestet müsste aber funktionieren.
  (hab eine Min. bei Google suchen müssen)
  function ReplaceCharFast (const s: string;
  ch1: char; ch2: char): string;
  var i: integer;
  begin
  Result := s;
  for i := 1 to length (Result) do
  if Result = ch1 then
  Result := ch2;