Zugriff auf Strings / Listen langsam?

[OlliWW]

Das mit dem OnChange habe ich geprüft.
Es war tatsächlich so, dass ich das OnChange Ereignis erst NACH dem AddStrings zugewiesen habe und dadurch konnte ich auch einen Performancegewinn erzielen.

Dennoch bleibt die Frage:
Warum ist es nur bei RDP Verbindungen so langsam? In dem OnChange läuft übrigens ein: PopupMenü.Popup
Da dieses auch an vielen weiteren Stellen im Code aufgerufen wird, habe ich mittlerweile den Verdacht dass die Performance Probleme zwischen Delphi Code und RDP beim Popup Menü zu suchen sind.

[Dejan Vu]

Zitat:

Die Stelle wird 13 mal aufgerufen an der Stelle wo ich messe. Mit maximal 50 Items pro Aufruf. Insagesamt dauern diese 13 Durchläuft: 1,3 Sekunden.

Reicht es nicht, diese Stelle nur 1x aufzurufen, und zwar mit den *letzten* Werten? Ich meine, wen interessiert es denn, wenn sich die Vorschlagsliste einer Combobox innerhalb von 1,3 Sekunden 13 mal ändert?

[OlliWW]

Ich schrieb bereits dass die Software etwas umfangreicher ist:
wir sind hier im create einer eigenen komponente die beim create einer bestimmten form eben 13 mal läuft.

[Dejan Vu]

Ach so. 13 Comboboxen. Na gut.

[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?

[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?