Umlaute in string erstetzen

[Popov]

Ansonsten hätte ich dir eine meiner Funktionen empfohlen. Die habe ich damals bei Delphi 3 geschrieben, die hatte kein StringReplace. Die Funktion ist zwar für Strings, aber ich schätze die kann man für seine Bedürfnisse anpassen:

Delphi-Quellcode:

type  
  TReplaceFlags = set of (rfReplaceAll, rfIgnoreCase);  //Wichtig!!! Global setzen


function StringReplace(const S, OldPattern, NewPattern: string; Flags: TReplaceFlags): string;

  function PosEx(Substr: string; S: string; Flag: TReplaceFlags): Integer;
  begin
    if rfIgnoreCase in Flag
    then Result := Pos(AnsiUpperCase(Substr), AnsiUpperCase(S))
    else Result := Pos(Substr, S);
  end;

var
  S2: String;
begin
  S2 := S;
  Result := '';
  while Length(S2) > 0 do begin
    if PosEx(OldPattern, S2, Flags) > 0 then begin
      Result := Result + Copy(S2, 1, PosEx(OldPattern, S2, Flags) - 1);
      Delete(S2, 1, PosEx(OldPattern, S2, Flags) + Length(OldPattern) - 1);
      Result := Result + NewPattern;
    end else begin
      Result := Result + S2;
      Delete(S2, 1, Length(S2));
    end;
    if not (rfReplaceAll in Flags) then begin
      Result := Result + S2;
      Delete(S2, 1, Length(S2));
    end;
  end;
end; {Popov}

[Furtbichler]

und das funktioniert auch, wenn der String utf-8 kodiert ist?

[Popov]

Keine Ahnung, wahrscheinlich nicht, habe ich auch für Delphi 3 geschrieben. Ist auch nur selber etwas machen.

[himitsu]

Das wird ihm nicht viel helfen, da das ANSI-UTF8-Problem weiterhin besteht.

Manchmal ist es zwar nervig, daß Delphi automatisch die Stringtypen konvertiert und da "versucht" automatisch die "richtige/passende" Konvertierung zu wählen, aber meistens ist es doch recht praktisch, daß hier Compiler und RTL/VCL zusammengehören.

Bei Lazarus ist halt das Problem, daß FPC und Lazarus nicht wirklich zusammengehören.
Der Compiler (FreePascal) und seine Typen sind weiterhin ANSI (bei Delphi hatte man sich dazu entschieden das auf Unicode umzustellen, genauer auf UCS2/UTF-16, was allerdings andere Probleme verursachte),
wärend Lazarus (RTL/VCL) an den meisten Stellen auf UTF-8 (damit es in 'nen AnsiString paßt) umgestellt wurde.

Nur gibt es da eben hier und da einige Probleme, wenn man vergißt die String-Kodierung anzupassen, bzw. wenn unterschiedliche Kodierungen aufeinandertreffen.
Man kann eben kein ANSI "ä" in einem UTF-8-String finden, oder umgekehrt.

[khh]

ich danke euch allen