Forum: Object-Pascal / Delphi-Language
Delphi
by BadenPower,
22. Feb 2015
Und mit den letzten 5 Posts hab ihr es nun geschafft einen Thread, in dem es um TreeNode's ging, vollkommen zu nichte zu machen.
Irgendwie ist mir allerdings aufgefallen, dass es die letzten 2 Tage so schon ruhig und entspannt hier im Forum war. An was das wohl gelegn hat?
Forum: Object-Pascal / Delphi-Language
Delphi
by BadenPower,
20. Feb 2015
Den ersten Unterknoten suchen und danach alle weiteren.
procedure TForm1.ChildNodeLoop(ATreeNode: TTreeNode);
var
lNodeNext: TTreeNode;
begin
lNodeNext := ATreeNode.GetFirstChild;
while (lNodeNext <> nil) do
begin