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

Izlistavanje sadrzaja foldera

[es] :: Pascal / Delphi / Kylix :: Izlistavanje sadrzaja foldera

[ Pregleda: 944 | Odgovora: 5 ]

 Postavi temu Odgovori

Autor
Pretraga teme: Traži
Markiranje Štampanje RSS

Bojann
Zrenjanin

Član broj: 13255
Poruke: 197
*.dialup.neobee.net.



Profil

icon Izlistavanje sadrzaja foldera03.07.2004. u 21:24

Kako da sadrzaj odredjenog direktorijuma iscitam u listbox?
03.07.2004. u 21:24 

Night
Dbk, Hr

Član broj: 3981
Poruke: 126
*.cmu.carnet.hr

Sajt: www.redrival.com/nrx


Profil

icon Re: Izlistavanje sadrzaja foldera04.07.2004. u 00:16
FindFirst, FindNext i FindClose su funkcije koje se koriste za takve stvari, ako hoces i sadrzaje poddirektorija onda ces morati i rekurziju koristiti.
the world is not enough ...
04.07.2004. u 00:16 

reiser
Vranje

Član broj: 7895
Poruke: 1884
195.252.85.*



Profil

icon Re: Izlistavanje sadrzaja foldera04.07.2004. u 01:23
Code:

procedure FeedToListBox(const path, FileExt : String);
var
  SearchRec : TSearchRec;
begin
  If FindFirst(Path + FileExt, $0000003F - $00000010, SearchRec) = 0 Then
    repeat
       // Ovde stavis sta da radi (ListBox1.Items.Add)
    until FindNext(SearchRec) <> 0;

  If FindFirst(Path + '*.*', $00000010, SearchRec) = 0 Then
    repeat
      If (SearchRec.Attr and $00000010 <> 0) and
         (SearchRec.Name <> '.') and
         (SearchRec.Name <> '..') and
         (Pos(WinDir, SearchRec.Name) = 0) Then
        FeedToListBox(Path + SearchRec.Name + '\', FileExt);
    until FindNext(SearchRec) <> 0;

  FindClose(SearchRec);
04.07.2004. u 01:23 

bancika
Branislav Stojkovic
Nis, New York

Član broj: 24844
Poruke: 620
213.184.102.*

ICQ: 84215453
Sajt: www.storm-software.co.yu/..


Profil

icon Re: Izlistavanje sadrzaja foldera04.07.2004. u 18:54
malo je ruzno sa konstantama tipa $0000003F $00000010
bolje je koristiti imena, da se zna sta je sta :)
Ride the rainbow, crack the sky
04.07.2004. u 18:54 

hwfanatic
Branko Grbac
Beograd

Član broj: 91
Poruke: 166
*.beotel.net



Profil

icon Re: Izlistavanje sadrzaja foldera04.07.2004. u 22:17
Čini mi se da u Delphiju već postoji takav jedan ListBox, ako ti treba već gotova stvar. Potraži po paleti; ako ništa drugo, možeš pogledati source...
Yea, and from this day forth, a surface must be locked before beast or man can draw upon it!
04.07.2004. u 22:17 

reiser
Vranje

Član broj: 7895
Poruke: 1884
195.252.85.*



Profil

icon Re: Izlistavanje sadrzaja foldera05.07.2004. u 00:46
Citat:
bancika: malo je ruzno sa konstantama tipa $0000003F $00000010
bolje je koristiti imena, da se zna sta je sta


Eh da, zamenio sam ih zato sto u mom programu nisam koristio SysUtils.
05.07.2004. u 00:46 

[es] :: Pascal / Delphi / Kylix :: Izlistavanje sadrzaja foldera

[ Pregleda: 944 | Odgovora: 5 ]

 Postavi temu Odgovori

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