Forum: Datenbanken
Delphi
by TUX_der_Pinguin,
22. Mai 2007
Mein erster Lösungs Ansatz sieht wie folgt aus
SQLQuery := TSQLQuery.Create(Self);
SQLQuery.SQLConnection := frmMain.SQLCon;
SQLQuery.SQL.Text := 'CALL GetTree('+QuotedStr(IntToStr(ParentID))+');';
SQLQuery.Open;
If SQLQuery.RecordCount > 0 Then Begin
While NOT SQLQuery.Eof Do Begin
Forum: Datenbanken
Delphi
by TUX_der_Pinguin,
21. Mai 2007
Hallo,
vielen dank für die zahlreichen tipps, ich habe das jetzt mit Stored Procedures probiert und alles scheint zu klappen
habe mir das Posting welches omata gepostet hat angesehen und das für meine Zwecke umgeschrieben.
Jetzt muß ich das ganze nur noch in meinem Projekt aufnehmen und das wars.
Nicht ganz so leicht wie ich dachte, ich habe irgendwie noch nicht so den Ansatz gefunden...
Forum: Datenbanken
Delphi
by TUX_der_Pinguin,
16. Mai 2007
Fridolin, das ist ein sehr interessanter Ansatz, nur in meinem Fall kann eine Unterliste mehrfach vorkommen.
Das würde dann mit "Nested Sets" problematisch, dann müßte man die Listen doppelt speichern das würde dann
Probleme bei der bearbeitung geben also auch nicht ganz sinnvoll.
Beisp.
Lager
->Farben
--->Rot
--->Grün
--->Blau
Forum: Datenbanken
Delphi
by TUX_der_Pinguin,
16. Mai 2007
Hallo,
ich wollte mal fragen ob und wie es möglich ist eine rekursive SELECT Abfrage zuerstellen.
Um etwas Klarheit zuschaffen was ich vorhabe versuche ich dies durch ein Beispiel anschaulicher
zumachen.
Tabelle Artikel
ID, Name
0, Rot
1, Grün