Random() zu langsam?

[shmia]

Zitat von Kuonrat:

Zitat von shmia:

Die Ursache für die schlechte Performance ist TListBox.Items.
Die Klasse ist zwar von TStrings abgeleitet, speichert seine Daten aber nicht selbst, sondern
per Windows Messages im darunterliegenden Control. Das Versenden von hundertausenden Messages braucht eben Zeit.
Abhilfe:
Daten in einer TStringList erzeugen und dann mit Assign auf die TListbox kopieren.

Hab ich ausprobiert, dauer exakt genauso lang.

Du hast recht; hier meine Messwerte zum Füllen mit 100000 Strings à 4 Zeichen:

Code:

TStringList:  62ms
TMemo:      11.1s
TListBox:   1.75s

man sieht, dass TStringList um Welten schneller ist.
Es dauert allerdings gleich lang, wenn man eine TListBox direkt befüllt oder zuerst TStringList befüllt und dann auf TListbox "assigned".
(eigentlich logisch; in beiden Fällen müssen 100000 Messages verschickt werden)
ABER: wenn man auf die Strings zugreift um z.B. sie zu sortieren, dann macht das einen Unterschied
von Faktor 30 ob man den Sortiervorgang auf einer StringList ausführt oder auf TListBox.Items.