Forum: Object-Pascal / Delphi-Language
Delphi
by wwild0473,
8. Aug 2006
Hallo nochmal,
nach etwas Granufink im Tee hat sich die procedure geklärt. Hier der funktionierende Quellcode für die Funktion, damit andere mit dem gleichen Problem Abhilfe finden :-)
procedure tdlnode.Grab(node: TTreeNode);
var
TmpNode : TTreeNode;
begin
If Node <> Nil then
Forum: Object-Pascal / Delphi-Language
Delphi
by wwild0473,
7. Aug 2006
Hallo,
ich habe folgendes Problem. Ich habe einen treeview. Der hat auf level 0 genau 1 Knoten.
Darunter kann, oder auch nicht ein oder mehrere Unterknoten sein. Ab diesen Unterknoten muß ich jeweils alle Daten des Knoten auslesen. (Die Daten sind eine Klasse "tdlnode" mit einem Datenrecord ".daten".
Alles, was also JEWEILS unter Knotenlevel 1 ist, muß erfaßt werden.
Der entsprechende...