[VST] Daten hinzufügen ?

[generic]

wenn du das tutorial nicht lesen willst, kannst du alternativ ein video schauen:
http://www.delphipraxis.net/videos#Stammtisch_2

[Hansa]

Die Fragen sind NACH dem Lesen des Tutorials aufgetaucht. Ähhm, ist das etwa von dir ? Master/Detail habe ich jetzt in dem VST abgebildet. Allerdings fehlt mir die Funktion, alle Knoten aufzuklappen. Gibts das überhaupt ? Ich muss noch untersuchen, ob leere Knoten richtig behandelt werden.

[Nuclear-Ping]

VST.FullExpand oder VST.Expanded[Node] := TRUE/FALSE

[Hansa]

Ah ja. Thx. Das schwierigste an dem Ding ist für mich wohl die Nomenklatur. Da sucht man nach Count und es ist TotalCount. Expand ist FullExpand. Das Fullexpand brauche ich nur für Testzweccke. Wo ist jetzt aber die Funktion gezielt auf ein Klick auf das + zu reagieren ?

[Nuclear-Ping]

OnExpanded / OnExpanding

[Hansa]

Mann, bin ich dämlich. Wenn ich das + anklicke, wie kriege ich dann noch raus, um welchen Knoten es sich handelt ? Die Detaildaten von Anfang an alle komplett zu lesen, das wird zu viel. Noch besser wäre es, nicht nur das + treffen zu müssen, sondern nur den kompletten Knoten (also egal, ob + oder Beschriftung

[Nuclear-Ping]

In den Events gibt er doch den Node mit?

[toms]

Zitat von Nuclear-Ping:

In den Events gibt er doch den Node mit?

Ja, das gibt es

OnExpanding(Sender: TBaseVirtualTree; Node: PVirtualNode; var Allowed: Boolean);

[Hansa]

Jetzt habe ich über 2 Stunden gebraucht, noch mit Umwegen über die TreeView-Hilfe, um das rauszufinden :

 ShowMessage(vstDaten.Text [Node,0]); Zumindest kann ich jetzt weitermachen.

Delphi-Quellcode:

NewNode := vstDaten.AddChild(nil);
...
if not DS.IsEmpty then
//  vstDaten.HasChildren [NewNode] := True;
  NewChildNode := vstRecDaten.AddChild(NewNode); // bleibt vorerst leer !!

Die Datenmengen sind doch zu groß, um den VST direkt komlett zu füllen. Jetzt muss ein + her, sofern Detaildaten überhaupt vorhanden sind. Die Holzhammermethode mit leerem Knoten einfügen die geht. Dann muss das Ding aber wieder weg und richtig gefüllt werden. Das auskommentierte mit dem HasChildren funktioniert so nicht. Warum ?

P.S.: das mit dem HasChildren hat sich vorerst erledigt. DS.Open war falsch auskommentiert. 8)

[OG Karotte]

Zitat von Hansa:

Die Datenmengen sind doch zu groß, um den VST direkt komlett zu füllen. Jetzt muss ein + her, sofern Detaildaten überhaupt vorhanden sind. Die Holzhammermethode mit leerem Knoten einfügen die geht.

Nun, um erst einmal darzustellen, das überhaupt Kindknoten vorhanden sind, sollte das ausreichen. Wenn Du nun den entspr. Knoten aufklappst, dann setzt Du die tatsächliche Anzahl der Kindknoten im OnInitChildren. Anschließend "befüllst" Du die Kindknoten mit ihren Daten im OnInitNode...