Sortierer, hab ein sehr interessantes problem

[glkgereon]

hi leute,
hier ein neues prog aus der Reihe "Programme, die die Welt nicht braucht":
Es generiert zufällig zahlen in eine listbox, und gibt sie sortiert in einer anderen aus
nebenbei kann man einstellen: wieviele zahlen und in welchem zahlenraum sie liegen
es wird geloggt, wie lange man (man=computer) für was gebraucht hat
alles kann in einer datei gespeichert werden

soweit so gut, aber auf einmal (in dem moment, als ich alles in groupboxen getan hab) sponn es auf einmal: in der ersten listbox, war alles wunderbar
aber in der zweiten (die sortierte) waren auf einmal immer ca. 50% der Elemente eine 66, wobei die liste weiterhin sortiert war. zudem fällt auf, das die anderen 50% aus den elementen bestehen, welche niedrig sind....

guckts euch mal an, bin dankbar für jeden lösungsvorschlag und jeden vorschlag zur vereinfachung (vereinfacherung? wie auch immer) des codes

PS: ist in delphi 6 gemacht