Hola amigos del foro, necesito su ayuda.
Lo que pasa es que tengo 2 TStringlist, en donde cargo información. Ahora lo que quiero es eliminar en el StringList2 los textos que existen en el StringList1 por ejemlpo.
StringList1
12345
12346
12347
StringList2
34957
95746
12345 =======> este quisiera eliminar porque ya existe en el StringList1 y así todos los que existan..
estoy intentando con algo así
Código Delphi
[-]var
i :integer;
Lista1, Lista2 :TStringList;
begin
for i := 0 to Lista1.Count -1 do
begin
if Lista2.IndexOf(Lista1.Text) = Lista1.Text then
Lista2.Delete(i);
end;
end;
si alguien me indica el camino.