StringReplace innerhalb von Schleifen

[Schmile]

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!

[Keldorn]

Hallo

stringreplace ist eine Funktion und hat einen Rückgabeparamter ;-)

edit außerdem muß es

Delphi-Quellcode:

for ... to Memo2.Lines.Count[b]-1[/b] do

heißen


Gruß Frank

[Schmile]

achja, tatsächlich ... vielen dank für die schnelle hilfe :wink: