Zugriff auf Strings / Listen langsam?

[OlliWW]

Zitat:

Zitat von mjustin (Beitrag 1274500)

Wenn es am Betriebssystem liegt, muss das Problem überall auf 2012er RDP Umgebungen reproduzierbar sein. Ist es möglich eine kompilierte Testanwendung bereitzustellen?

Es ist komischerweise nicht reproduzierbar. In meinen Win2012 Testumgebungen funktioniert es tadelos, bei zwei von vier Kunden mit Win2012 nicht.
Leider kann ich keine Testanwendung bereitstellen, da dies eine sehr umfangreiche Anwendung ist.

Die Frage was sich zwischen Server 2008R2 und 2012 geändert hat ist denke ich sehr interessant. Auf jedenfall hat sich die RDP Version geändert.

Kein Citrix System.

Auf dem 2008R2 keine DWM.exe auf dem 2012 schon. Allerdings laufen auf allen anderen Betriebssystemen außer 2012 die Anwendungen performant da sind viele Terminalserver bei.

[mjustin]

Zitat:

Zitat von OlliWW (Beitrag 1274511)

Leider kann ich keine Testanwendung bereitstellen, da dies eine sehr umfangreiche Anwendung ist.

Ich hatte es so verstanden dass es - innerhalb der Anwendung - schon mit diesem Code auffallend lange Verarbeitungszeiten von mehreren Sekunden bei 50 Einträgen gibt:

Delphi-Quellcode:

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

Um das Problem einzukreisen würde ich - falls die Kunden einverstanden sind - eine minimale Anwendung die praktisch nur obigen Code enthält auf ihrem Systen testen.

[Blup]

Durch die Änderung der Items ändert sich wahrscheinlich auch der ItemIndex zu -1.
Das löst ein zugewiesenes OnChange-Ereignis aus, mit allen Folgen.

Ich würd auch testen, ob diese Variante eventuell schneller ist:

Delphi-Quellcode:

  FontBox.Items.Text := meineForm.lstTTFonts.Text;

[arnof]

schalte die combobox einfach mal auf visible:=False und versuche mal ob es dann schneller geht

[OlliWW]

Items.Text brachte nichts
Visible := False brachte auch nichts


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. Meiner Meinung nach zu lange?

[mjustin]

Zitat:

Zitat von OlliWW (Beitrag 1274530)

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. Meiner Meinung nach zu lange?

Das entspricht 0,1 Sekunden pro Durchlauf und ist signifikant weniger als die ursprünglichen 6 Sekunden.

Bei diesen Werten würde ich von Alarmstufe Rot auf Gelb zurückschalten, dem Hinweis auf ausgeführten Code im OnChange Ereignis würde ich aber noch nachgehen.

[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. :oops: