Einzelnen Beitrag anzeigen

Benutzerbild von Der Jan
Der Jan

Registriert seit: 22. Dez 2005
289 Beiträge
 
Delphi XE7 Ultimate
 
#1

AnsiReplaceStr/AnsiReplaceText

  Alt 27. Jun 2008, 09:14
Hallo,

ich möchte in einem String Teilstrings ersetzen und habe dazu AnsiReplaceStr/AnsiReplaceText verwendet.
Da das Ergebnis fehlerhaft war, habe ich debuggt und dabei festgestellt, daß die Replace-Funktionen schlichtweg nichts taten, nach dem Replace stand noch das selbe drin wie vorher. Um andere Fehler auszuschließen, habe ich das ganze mal reduziert auf:
Delphi-Quellcode:
var
  s: string;
begin
  s := 'Das ist ein Test.';
  ShowMessage(IntToStr(AnsiPos('ein', s))); //Ergebnis: 9 ('ein' wird also gefunden)
  AnsiReplaceText(s, 'ein', 'kein');
  ShowMessage(s); //Ergebnis: Das ist ein Test.
end;
Hab s auch mal zum AnsiString gemacht, (man weiß ja nie ) und mit AnsiReplaceStr versucht, kein Erfolg.
Vielleicht steht ja wer auf meiner Leitung... Weiß jemand Rat?
Das passiert unter Delphi6. Andere IDEs zum testen habe ich leider gerade nicht installiert.
Gruß, Jan
  Mit Zitat antworten Zitat