"blacklist_from " vor jeder Zeile einfügen

[XeroX1504]

Hiho,

ich habe eigentlich ein ganz einfaches Problem, aber irgendwie komme ich nicht weiter...

Es geht darum, dass ich eine lange Liste mit Spam E-Mail Adressen in diesem Format:

[e-mail]
[e-mail]
[e-mail]

Jetzt soll das alles in dieses Format umgewandelt werden:

blacklist_from [e-mail]
blacklist_from [e-mail]
blacklist_from [e-mail]

Das Problem ist eigentlich nicht schwer, aber ich weiß nicht wie ich es anstellen soll, dass man die einzelnen Linien einer Memo anspricht. Als Eingabe stehen alle Adressen untereinander in einer Memo, anders geht's nicht oder?

Ich habe es ausprobiert mit einer einzelnen E-Mail Adresse, also mit einem Edit-Feld, in dem man die Adresse einträgt, dann auf einen Button klickt und im Memo dann die Adresse mit vorgeschobenem "blacklist_from " habe, aber eine "Stapelverarbeitung" bekomme ich nicht hin.

Könnt ihr mir bitte ein paar Tipps geben, so schwer ist das doch garnicht oder ?

[Cyberbob]

Wenn du die E-Mail-Adressen in nem Memo stehen hast, sollte vollgendes gehen.

Delphi-Quellcode:

for i := 0 to Memo1.Lines.Count - 1 do
begin
  Memo1.Lines.Strings[i] := 'blacklist_from ' + Memo1.Lines.Strings[i];
end;

Wenn du die E-Mail-Adressen hintereinander stehen hast, solltest du mit POS auf ein freizeichen Testen und mit Copy die Einzellnen Strings extrahieren und ergänzen.

[XeroX1504]

Vielen Dank. Habe es hinbekommen!