Wenn du in einer Zeile zwei Mal den Suchbegriff stehen hast, dann haut Pos alleine nicht hin und du brauchst schon eine Rekursion. Das ist unnötig.
Deshalb: Pos + StringReplace.
Delphi-Quellcode:
for i := 0 to Memo1.Lines.Count-1 do
if Pos(Suchbegriff, Memo1.Lines[i]) > 0 then
StringReplace(Memo1.Lines[i], Suchbegriff, Ersetzbegriff, [rfReplaceAll]);
Mist zu spät....
Wenn der Link nicht bekannt ist, dann holt man ihn sich doch eh, dann funktioniert es wieder.