Hallo Van HelF,
ich weis nicht ob ich es richtig verstanden habe, aber ich will es mal beschreiben wie ich es verstanden habe.
Gegeben ist ein TreeView mit folgendem Aufbau:
Code:
+Ebene1
| |
| -----Ebene11
| -----Ebene12
| -----Ebene13
|
+Ebene2
|
----Ebene21
----Ebene22
----Ebene23
So, wenn ich die Frage jetzt ich richtig verstanden habe, willst Du jetzt die Anzahl ermitteln von Ebene11 – Ebene23, das heißt in dem Beispiel währe das Ergebnis 6.
Man kann mit der Eigenschaft Level von TTreeNode die Anzahl ermitteln.
In dem Beispiel wird der Text von Ebene11 - Ebene23 in eine Listbox ausgegeben.
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
Knoten: TTreeNode;
begin
Knoten:= TreeView1.Items.GetFirstNode; // auf den ersten Knoten setzen.
while Knoten <> NIL do
begin
if Knoten.Level=1 then
begin
Listbox1.Items.Add(Knoten.Text); // Es werden nur die Knoten auf der 2 Ebene ausgeben.
end;
Knoten:= Knoten.GetNext
end;
end;
Bis bald Chemiker