Registriert seit: 11. Apr 2003
Ort: Moestroff (Luxemburg)
3.741 Beiträge
Delphi 2007 Professional
|
Re: Ausgeben von einer Datenbank mit TTreeView
30. Aug 2004, 11:32
Hallo,
da gehst du am besten rekursiv durch deine Tabelle, damit du deinen Baum aufbauen kannst... Angefangen wird, indem du dir einen Stammknoten bildest, und dich auf diesen positionierst. Das wär bei dir
select * from tabelle where intArtKarID = 0
und setzt dann ID := intArtKatID ;
Dann muss du folgende Abfrage rekursiv durchlaufen:
1.
select * from Tabelle where intArtKatParent = :ID
2. Eintrag in Tabelle einfügen, mit Parent :ID
3. ID := intArtKatID (hier dann rekursiver Aufruf)
4. auf nächsten Eintrag in deinem Resultset der Abfrage gehen und zurück zu Punkt 1., bis du am Ender deines Resultset angelangt bist
So würd ichs zumindest machen.
Gruß,
Tom
|