Wort oder Satz in Memo finden und ersetzen

[taktaky]

Zitat von Nils_13:

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.

Hallo zusammen,

ich glaube Nils-Idee ist bis jetzt am besten

auf jeden Fall hier ist meine moemische Idee aber funktioniert

Ich gleube, ich habe eine idee
ich habe den Text in Memo so verzerrt und vereinfacht und nun habe ich den Link in Falle
http://members.lycos.co.uk/forforums...-ersetzen3.jpg

jetzt kann ich so versuchen

Delphi-Quellcode:

memo1.LoadFromFile('link.txt');// der Link wird von link.txt in memo1 gespeichert
Memo2.Lines[10]:=memo1.lines;

das Problem ist damit gelöst, möchte ich aber den Code kurzer machen ohne Umweg

ich habe b´versucht so :

Delphi-Quellcode:

Memo2.Lines[10]:=loadfromfile('link.txt'); //geht leider nicht, error
Memo2.line10.add(loadfromfile('link.txt')); // geht auch nicht

was ist Falsch?

Ich werde aber gerne Nils-Idee nehmen

Delphi-Quellcode:

 _____        ___   __   _   _   _    _____  
|  _  \     /   | |  \ | | | | / /  | ____| 
| | | |    / /| | |   \| | | |/ /   | |__   
| | | |   / / | | | |\   | | |\ \   |  __|  
| |_| |  / /  | | | | \  | | | \ \  | |___  
|_____/ /_/   |_| |_|  \_| |_|  \_\ |_____|