(Moderator)
Registriert seit: 6. Mai 2005
Ort: Berlin
4.956 Beiträge
Delphi 2007 Enterprise
|
Re: Oberste Node in TreeView finden
15. Sep 2008, 12:21
Delphi-Quellcode:
Function GetTopItem(ANode : TTreeNode) : TTreeNode;
Begin
While ANode.Parent<>Nil do ANode := ANode.Parent;
Result := ANode.Parent;
End;
Nur der Vollständigkeit halber.
"Wenn ist das Nunstruck git und Slotermeyer? Ja! Beiherhund das Oder die Flipperwaldt gersput!"
(Monty Python "Joke Warefare")
|