sql de ağaç yapısı

[delphikursu]

ben sql kullanarak nasıl ağaç yapısı yapabilirim aslında fitreleme kullanarak yapmıştım ama kayıtlar fazla olunca afalladı yazdığım kod şuydu

Kod: Tümünü seç

data.ana.First;
data.ana.Filter:='ANA_STOK_GRUP_NO=0';
data.ana.Filtered:=true;
while not data.ana.Eof do
begin
if Data.anaANA_STOK_GRUP_NO.AsInteger=0 then
begin
ana:=TreeView1.Items.Add(nil,data.anaGRUP_ADI.AsString);
end;
data.kirilma1.Filter:='ANA_STOK_GRUP_NO='+data.anaSTOK_GRUP_NO.AsString;
data.kirilma1.Filtered:=true;
data.kirilma1.First;
while not data.kirilma1.Eof do
begin
if (data.anaSTOK_GRUP_NO.AsInteger=data.kirilma1ANA_STOK_GRUP_NO.AsInteger) and (data.kirilma1SEVIYE.AsInteger=2) then
begin
k1:=TreeView1.Items.AddChild(ana,data.kirilma1GRUP_ADI.AsString);
end;
data.kirilma2.Filter:='ANA_STOK_GRUP_NO='+data.kirilma1STOK_GRUP_NO.AsString;
data.kirilma2.Filtered:=true;
data.kirilma2.First;

Not: Okunaklı olması açısından kodları bloklu ve [ code ] [ /code ] biçim imleri/tag içinde yazalım. Derdini net anlatmayan dermanını kolay bulamaz rsimsek

[lazio]

PARENT_ID SELF_ID XXXX
0 1 aaaa
0 2 cccc
1 3 eeee
1 4 fffff
2 5 sdsd
2 6 dfsdf
...
...

tablo yapın bu şekilde ise CxBileşen setindeki dxDBLookupTreeView bileşeni bu işi çok güzel yapıyor..

[delphikursu]

cx bileşeni derken anlamadım biraz daha açıklama yapabilitmisiniz birde dblooktreeview nasıl kullanacağım hakkında bilği verebilirmisiniz size zahmet