TStrings (ListBox.Items) ohne ".add" ?

[HeZa]

Da ja bekannt ist wie viele Elemente eingefügt werden sollen, könnte es etwas bringen vorher Items.Capacity zu setzen (bei nicht virtueller Listbox).
Habe leider gerade kein Delphi zur Hand um das mal testen zu können.

Ciao Heza

[Uwe Raabe]

Zitat von HeZa:

Da ja bekannt ist wie viele Elemente eingefügt werden sollen, könnte es etwas bringen vorher Items.Capacity zu setzen (bei nicht virtueller Listbox).

Das TListBox.Items eine TListBoxStrings-Instanz ist, die SetCapacity nicht überschreibt, wird dort lediglich die leere Implementierung von TStrings ausgeführt. Bringt also rein gar nichts.

Diese TListBoxStrings-Klasse hat nur wenig mit einer TStringList gemein, was die üblichen Optimierungstechniken in der Regel scheitern lässt. Lediglich BeginUpdate/EndUpdate führt den entsprechenden WM_SETREDRAW Aufruf durch. Deswegen ist Assign auch langsamer als eine Folge von Add-Aufrufen, da bei Assign nach jedem Add auch noch ein PutObject folgt, was wiederum eine LB_SETITEMDATA Message sendet.

[Rolf Frei]

Listbox.Items.Text := #13#10#13#10#13#10#13#10#13#10#13#10#13#10#13#10#1 3#10#13#10;

So hast du 10 Leerzeilen.

[Uwe Raabe]

Zitat von Rolf Frei:

Listbox.Items.Text := #13#10#13#10#13#10#13#10#13#10#13#10#13#10#13#10#1 3#10#13#10;

So hast du 10 Leerzeilen.

Macht am Ende auch wieder 10 Add-Calls.

[MicMic]

Wichtig wäre noch zu erwähnen, wenn man nun das "lbVirtualOwnerDraw" und "LB_SETCOUNT" nutzt, dass man (wenn man die Anzahl braucht) nicht "ListBox.Count", sondern "ListBox.Items.Count" nutzt. Mir ist das zufällig aufgefallen, weil eine Sache bei mir nicht mehr funktionierte und gesehen habe, dass ich "ListBox.Count" angegeben hatte und sonst überall "ListBox.Items.Count". Nur mal so zur Info.

[DieDolly]

Statt solcher Tricks die betriebssystemabhängig sind würde ich ganz einfach VirtualStringTree nutzen.

[MicMic]

Zitat von DieDolly:

Statt solcher Tricks die betriebssystemabhängig sind würde ich ganz einfach VirtualStringTree nutzen.

Sicherlich hat diese und jene Komponente Vorteile. Ich hatte viel am Anfang ausprobiert und musste feststellen, dass eine ListBox doch am schnellsten ist und ich sie nach meinen Bedürfnissen gut anpassen kann.

[HeZa]

Zitat von Uwe Raabe:

Das TListBox.Items eine TListBoxStrings-Instanz ist, die SetCapacity nicht überschreibt, wird dort lediglich die leere Implementierung von TStrings ausgeführt. Bringt also rein gar nichts.

Dann ist die Sache ja klar. Will man schnell sein, programmiert man eine virtuelle ListBox, ansonsten muss man sich mit der Performance von Add zufrieden geben.

Oder man überlegt nochmal, warum man so viele Items in eine ListBox pumpen will.

Ciao Heza