Zahlen aus Memo entfernen

[Klaus01]

Delphi-Quellcode:

for i:=0 to memo2.lines.count -1 do
  begin
     idx := Memo1.lines.indexof(memo2.lines.strings[i]);
     if idx <> -1 then
       Memo1.lines.delete[idx];
  end;

mit i: Byte und idx auch Byte

das sollte zum Ergebnis führen.

Grüße
Klaus