Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.

Indy listanje mapa i datoteka

[es] :: Pascal / Delphi / Kylix :: Indy listanje mapa i datoteka

[ Pregleda: 1542 | Odgovora: 3 ] > FB > Twit

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

matobj

Član broj: 72323
Poruke: 73
*.adsl.net.t-com.hr.



Profil

icon Indy listanje mapa i datoteka11.10.2010. u 17:23 - pre 164 meseci
Pozdrav,

kako bih mogao sa Indy 10 FTP komponentom izlistati posebno mape, a posebno datoteke sa servera?
Imam neki primjer gdje gledam velicinu datoteke, pa ako je ona -1 onda je to mapa, a ostalo su datoteke, ali to je uzasno sporo.

Ako netko ima kakvu ideju ili primjer bio bih mu zahvalan :)
 
Odgovor na temu

matobj

Član broj: 72323
Poruke: 73
*.adsl.net.t-com.hr.



Profil

icon Re: Indy listanje mapa i datoteka12.10.2010. u 08:01 - pre 164 meseci
Nitko? Netko? Ideja? :)
 
Odgovor na temu

Milos D
Beograd

Član broj: 5621
Poruke: 280
*.adsl-a-5.sezampro.rs.



+1 Profil

icon Re: Indy listanje mapa i datoteka12.10.2010. u 10:07 - pre 164 meseci
Nema potrebe da gledas velicinu fajla. Evo isecaka iz jednog mog programa koji sve mape tj. direktorijume stavlja u StringList


...
FTPClient.Connect;
FTPClient.ChangeDir(Session.Username);
FTPClient.List (nil);
...

procedure GetDirList (sl: TStringList);
var iDir: integer;
begin
sl.Clear;
for iDir := 0 to FTPClient.DirectoryListing.Count-1 do
if (FTPClient.DirectoryListing[iDir].FileName<>'.')
and (FTPClient.DirectoryListing[iDir].FileName<>'..')
and (FTPClient.DirectoryListing[iDir].ItemType=ditDirectory)
then sl.Add (FTPClient.DirectoryListing[iDir].FileName);
end;

 
Odgovor na temu

matobj

Član broj: 72323
Poruke: 73
*.adsl.net.t-com.hr.



Profil

icon Re: Indy listanje mapa i datoteka12.10.2010. u 11:05 - pre 164 meseci
Probam. Hvala :)
 
Odgovor na temu

[es] :: Pascal / Delphi / Kylix :: Indy listanje mapa i datoteka

[ Pregleda: 1542 | Odgovora: 3 ] > FB > Twit

Postavi temu Odgovori

Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.