treeview

0

chcę aby w komponencie treeview były dostępne tylko 4 foldery o cieżce tam gdzie znajduje się program.
foldery odpowiednio 1 2 3 4 chciałbym
żeby po kliknięciu na każdy folder w komponencie listview pokazywała sie jego zawartoć
kto ma pomysła jak to zrobić???
tylko żadnych innych komponentów próbowałem innych ale do mojego celu się nie nadajš.....

0

Musisz używać klasy TTreeNode i metody addChild('to co się wyświetla'). Pierwszego Noda dodaje się chyba tak (nie mam delphi żeby sprawdzić):

var tn:TTreeNode;

tn:=TTreeNode.Create;
tn.Name:='1';
TreeView1.Nodes.AddChildLast(tn,nil);

A potem każdemu Nodowi dodajesz dzieci, które opisują zawartość katalogu.

POzdr {brawo} --Michał
TJS group
delphi 5,6
" Praktyka - to jest wtedy gdy wszystko działa lecz nikt nie wie dlaczego
Teoria - jest wtedy gdy nic nie działa ale wszyscy wiedzą dlaczego,
My łączymy teorię z praktyką
NIC NIE DZIAŁA I NIKT NIE WIE DLACZEGO "

0

ta procedurka generuje daną ilość pozycji głównych z daną ilością pozycji pochodnych:
procedure TForm1.Button1Click(Sender: TObject);
var calosc,rodzic:TTreeNode;
i,z:byte;
begin
with treeview do
begin
calosc:=TTreeNode.Create(Items);
for i:=1 to spin1.Value do
begin
rodzic:=Items.Add(calosc,'rodzic'+inttostr(i));
for z:=1 to spin2.Value do Items.AddChild(rodzic,'pochodna'+inttostr(z));
end;
end;
end;

moze ci pomoze--Delphi 6
Pozdrowienia{hello} ,
Moderator Imperior

1 użytkowników online, w tym zalogowanych: 0, gości: 1