Problem mit Zusammenfassung von Listeneinträgen

[sh17]

wie vorhin, nur über eine eigene IndexOf Funktion, die prüft, ob das Array schon drin ist

in etwa:

Delphi-Quellcode:

for i := 0 to list1.Count-1 do 
if List2.indexofarray(list1[i]) < 0 then 
  the list2.add(list1[i]);