1:n Datenbank auslesen -> Menü erstellen

[Matt]

Ich glaub ich habs, danke fkerber, hast mich auf den richtigen Weg gebracht.

Hier das Ergebnis (Rohformat)

Delphi-Quellcode:

select * from bla where parentid = 0 <- dataset
getit(0,0)

Sub getit(id, parentid)
  Dim parent As DataRow
  Dim ParentTab As DataTable
  ParentTab = tsearch.Tables("select")
     For Each parent In ParentTab.Rows
   //erstelle was...
     getit(parent.Item(0), parent.Item(2))
     Next parent
end sub

Item(0) = ID
Item(2) = ParentID

Ich danke Euch!!!

Gruß Matt