Bestimmte Zeichen im String durch andere ersetzen!?

[LukeGee]

Hallo,

wie kann ich bestimmte Buchstaben bzw. Zeichen in einem String durch andere ersetzen?

Danke.

MfG

[mkinzler]

StringReplace/AnsiStringReplace

[mr.winkle]

oder mit ner for-schleife...

Delphi-Quellcode:

var s:string;
    i:integer;
 //...
s:='Dein text';
for i:=1 to length(s) do
 if s[i]='t' then s[i]:='T';

[Cyberbob]

Oder mit der Funktion Translate()


Siehe hier

[LukeGee]

Hallo, ok ich habs jetzt mit StringReplace gemacht. Aber wie kann ich mehrere zeichen ersetzen lassen. eins ist ja kein problem, da hab ich:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  text: string;
  text2: string;
begin
text := edit1.text; //eingabe des edit felds wird in der text variable gespeichert.
  text2:=StringReplace(text,'a','e',[rfReplaceAll, rfIgnoreCase]); // die 'a's werden durch'e's ersetzt und dann in der text2 gespeichert.
Panel1.Caption:=text2; //die wird im panel feld ausgegeben.
end;

aber wie mach ich das, wenn ich mehrere verschiedene zeichen ersetzen lassen will?

[fwsp]

schrittweise nacheinander.

[SirThornberry]

mehrere StringReplace hintereinander wären eine Lösung oder dann eben mit der For-Schleife

[LukeGee]

aber wenn ich

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject); 
var 
  text: string; 
  text2: string; 
begin 
text := edit1.text;
  text2:=StringReplace(text,'a','e',[rfReplaceAll, rfIgnoreCase]); 
  text2:=StringReplace(text,'b','f',[rfReplaceAll, rfIgnoreCase]); 
Panel1.Caption:=text2; 
end;

mache, dann ersetzt es immer nur das letzte. also die Bs duch Fs.

[fwsp]

guck mal was du StringReplace übergibst.

text?

//Edit1
Man nennt keine variable Text, kann zu problemen mit der Form kommen.

[3_of_8]

Mit zwei verschachtelten For-Schleifen und zwei Arrays of Char könnte man das auch sehr schön hinkriegen.

Achja und wenn das System so weitergehen soll, also a->e, b->f, c->g, ..., z->d, dann kannst du das auch einfacher hinkriegen.

@fwsp: Kann es nicht. Lokale Variablen und Parameter haben Vorrang vor Felder der Klasseninstanz.