Jak wypisac liste plikow z serwera w VirtualTreeView ?

0

Dowiedzialem sie ze istnieje calkiem ciekawy komponent o nazwie VirtualTreeView niestety znalazlem helpa w jezyku angielskim a nie jestem z nieo dobry :-( i prosze o podpowiedz jak wypisac liste plikow i folderow z serwera opartego na IdFTP , IdFTPServer ? Poprzednio wypisywanie realizowale za pomoca kodu ponizej umieszony jest w kliencie ale jak to zrobic w VirtualTreeView [???]

s:=TStringList.Create;
idftp1.List(s,'',true);
memo1.Lines.AddStrings(s);
0

przecież masz tam dema - jak angielski Ci nie odpowiada to sobie źródła zobacz

0

Tylko, że źródła to też angielski w duzym stopniu. ;)

Nie wiem czy to pomoże, ale gdzieś w internecie znajduje się obszerny poradnik do VTV po niemiecku, mi on nie pomógł bo niemieckiego nie znam, może Tobie pomoże. :)

0
Nex napisał(a)

Tylko, że źródła to też angielski w duzym stopniu. ;)

eee źródła to o. pascal :>

0

Oczywiście że Object Pascal... Ale w gruncie rzeczy, jak ktoś nie zna pascala, a zna angielski to powinien coś zrozumieć z kodu (begin/end; for/do; case; itp :d )... To działa w drugą stronę. Np. właściwość ChildCount, bez znajomości angielskiego nic nie powie, trzeba będzie szukać jej definicji, która prawdopodobnie w języku angielskim (jak cała dokumentacja Borlanda i Microsoftu - które są skarbnicą wiedzy :) ). :)Więc znajomość angielskiego bardzo ułatwia. To miałem na myśli. :d

0

Moze to cos pomoze:



Procedure Tform1.Lista1;
var
  I,obrazek: Integer;
  FCaptions   : TStringList;

begin
FCaptions    := TStringList.Create;
obrazek :=0; //numer obrazka w image list

(...) tutaj wypelnij liste FCaptions    

for i := 1  to FCaptions.Count do
begin
Node := MyTree.AddChild(nil); // adds a node to the root of the tree
NodeD := MyTree.GetNodeData(Node);
NodeD.BasicND := TBasicNodeData.Create(FCaptions[i-1] ,obrazek);
end;

end;

Poczytaj dokladnie help, tam pisze jak dziala dodawanie recordow.

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