In einer StringList jedes Zeichen durch ein anderes ersetzen

Hallo,
ich habe einen Teil vom folgenden Text zufällig im Forum gefunden was mir schon weitergeholfen hat.
Also ich möchte jedes Zeichen einer StringList durch ein anderes ersetzen.
Aber ich weiß nicht wie ich das machen soll. Und 100%ig weiß ich auch nicht ob der Quelltext unten richtig ist. Hoffentlich kann mir einer helfen!?
DaNkE

{
for(int x=0; x < textdatei->Count; x++)
 {
 for(int y=0; y < textdatei->Strings[x].Length(); y++)
  {
  TStringList *list1 = new TStringList();
  OpenDialog1->Execute();
  list1->LoadFromFile(OpenDialog1->FileName);
  TStringList *list2 = new TStringList();
  list2->LoadFromFile("dd62.dat");
  int l2;
  for(int l1 = 0; l1 < list1->Count; l1++)
   {
   Application->ProcessMessages();
   if ((l2 = list2->IndexOf(list1->Strings[l1])) > -1)
    {
    //hier richtig?
    }
   }
  }
 }
}

akari

Hallo

siehe in der BCB-Hilfe zu TStringList::Text und StringReplace

bis bald
akari