Zugriff auf Strings / Listen langsam?

[OlliWW]

Guten Abend,

Ich bin weiter gekommen:
Ich konnte die Geschwindigkeit signifikant erhöhen, indem ich in den Projekteinstellungen die Laufzeitthemes dekativiert habe. Vorher standen sie auf aktiviert und Standard Stil: Windows

Kann sich das einer erklären? :shock:

[Dejan Vu]

Na, zeichnen werden die schon die Comboboxen, und das scheint ziemlich suboptimal implementiert zu sein.

Du kannst übrigens marginal etwas verbessern: Ziehe die Abfrage, ob meineForm <> nil ist, vor das Begin/EndUpdate:

Delphi-Quellcode:

if meineForm <> nil then
  with FontBox do
    begin
    Items.BeginUpdate;
    Items.AddStrings(meineForm.lstTTFonts);
    Items.EndUpdate;
  end;

Ich bin mir auch ziemlich sicher, das dein Begin-/EndUpdate überflüssig ist und daher würde ich das Statement so einkürzen.

Delphi-Quellcode:

if meineForm<>nil then 
  FontBox.Items.AddStrings(meineForm.lstTTFonts);

Das ist lesbarer. Und schlimmer wird es auch nicht, performancetechnisch gesehen.

PS: Sicher, das keine Events an den Combos hängen?