TreeView aus DB füllen

[Christian18]

Also ich habe schon mal angefangen.

ich würde es so machen.

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  Table1.First;
  while not Table1.Eof do
    begin
      while not Table2.Eof do
        begin
          while not Table3.Eof do
            begin
              Table3.Next;
            end;
          Table2.Next;
        end;
      Table1.Next;
    end;
end;

Und jetzt weiß ich bloß nicht weiter. Ich weiß jetzt nicht wie ich den ersten Knoten mache. dann die unterknoten und zu den unterknoten dann die einträge. wie kann ich das machen???

MFG Christian18