hallo leute!
habe folgendes problem: ich möchte gerne ein ziel-memo (Memo2) durchsuchen lassen und dabei einen bestimmten substring, der in einem anderen memo deklariert ist (MemoOldProvinces) jeweils durch einen anderen string, der wiederum in einem anderen memo (MemoNewProvinces) steht, ersetzen lassen. macht meine prozedur aber leider nicht. habe dazu folgenden code geschrieben:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var i,j:integer;
begin
for j:=0 to Memo2.Lines.Count do
begin
for i:=0 to MemoOldProvinces.Lines.Count do
begin
StringReplace(Memo2.Lines[j],MemoOldProvinces.Lines[i],MemoNewProvinces.Lines[i],[rfReplaceAll]);
end;
end;
end;
was muss ich da noch ergänzen?!
schönen dank im voraus!