vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
 sevAniGif - als kostenlose Vollversion auf unserer vb@rchiv CD Vol.5  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2025
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Fortgeschrittene Programmierung
Merkwündige Probleme mit MS TreeView 
Autor: boehse
Datum: 24.10.05 11:08
Erstmal Hallo euch allen... Nun zu meinem wohl sehr ausgefallenem Problem, würde mich rießig freuen wenn hier auch nur eine Person drüber stolpert, die nicht genau so verwundert ist wie ich...

Also, folgende Umgebung: Habe ein MS TreeView mit ~ 4.000 Nodes & möchte alle umbenennen. Hierfür ist noch wichtig ob es Childs hat & diese sichtbar sind. Also habe ich es zunächst mit dieser Schleife gelöst (die wohl jeder wählen würde): 
For Each myNode In myTree.Nodes
     If myNode.Children = 0 Then
          myNode.Text = myNodeInfos(myNode.Key).NameSingular
     Else
          If myNode.Child.Visible = False Then
               myNode.Text = myNodeInfos(myNode.Key).NameSingular
          Else
               myNode.Text = myNodeInfos(myNode.Key).NamePlural
          End If
     End If
Next myNode
Zeit wenn alle Nodes expnadet sind: ~ 30-40sec...

ersetze ich es nun durch folgende Funktion: 

Dim tmpStr() As String
 
ReDim tmpStr(1 To myTree.Nodes.Count)
 
For Each myNode In myTree.Nodes       
 
     l = l + 1
 
     If myNode.Children = 0 Then
          tmpStr(l) = myNodeInfos(myNode.Key).NameSingular
     Else
          If myNode.Child.Visible = False Then
               tmpStr(l) = myNodeInfos(myNode.Key).NameSingular
          Else
               tmpStr(l) = myNodeInfos(myNode.Key).NamePlural
          End If
      End If
 
Next myNode
 
l = 0
 
For Each myNode In myTree.Nodes
     l = l + 1
     myNode.Text = tmpStr(l)
Next myNode
Fazit: ~ 0.5 - 1sec...


Kann mir da jemand helfen? Bin gerade dabei den glauben an jegliche logik zu verlieren... & wer's nicht glaubt kann's gerne ausprobieren ;)

Danke für jegliches Feedback...
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Merkwündige Probleme mit MS TreeView663boehse24.10.05 11:08
Re: Merkwündige Probleme mit MS TreeView433boehse24.10.05 11:14

Sie sind nicht angemeldet!
Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.

Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  GesamtübersichtSuchen 

nach obenzurück
  
   

Copyright ©2000-2025 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel