Tablice i lista zawartości katalogów

[Dawidsu]

Mam problem, towarzysze!

 

Nie jestem zbyt dobry w tablicach i pętlach. Próbowałem jednak napisać skrypt, wzorując się na przykładzie "katalogi" na stronie, który zapisywałby do tablicy zawartość katalogu, ale wraz z zawartością. Moglibyście mi pomóc? Jeśli ktoś nie kapuje, pokazuję i objaśniam:

 

Drzewo katalogów:

 

Folder

|

|-Katalog1

|

|-Katalog2

| |-plik.txt

|

|-Katalog3

| |-Folderek

| | |-plik.gif

| | |-plik.exe

| |

| |-Foldereczek

| |-plik.ini

|

|-Katalog4

 

Skrypt wyświetliłby kolejne wiersze z tablicy, wyglądałoby to tak:

 

Katalog1

Katalog2

plik.txt

Katalog3

Folderek

plik.gif

plik.exe

Foldereczek

plik.ini

Katalog4

[Tymon]

https://gmclan.org/up152_11_katalogi.html

Pozdrawiam :)

[Dawidsu]

DZIĘKI!!! :) Jest super, tylko przy włączeniu pojawia się błąd.

 

ERROR in
action number 1
of Draw Event
for object0:

Error in code at line 84:

y = min(-my_pos * string_height(dir)+(string_height(dir)*10),0);

at position 11: Unknown variable my_pos

 

Można tego uniknąć na początku Draw Event wpisać my_pos=0

Tylko nie wiem, czemu literki na siebie nachodzą(na samej górze)

[Tymon]

Hmm, mi się nie nachodzą :) Ale to już kwestia wyedytowania kodu w Draw.

 

Co do tego my_pos=0. Lepiej to dać w Create.

[Dawidsu]

I coś tu jeszcze chyba nie gra! W głównym katalogu wyszukuje jedynie katalogi "." i ".." - tak mi się wydaje. Podkatalogi w katalogu dir traktuje jako te pliki. Spis wygląda dziwnie. Skrypt wychodzi wyżej o katalog i podaje jego zawartość oraz podaje zawartość katalogu dir (czyli same podkatalogi, które są w nim, bez ich zawartości). Tak skrypt działa u mnie. :(

Sprawdzałem. Dodałem mu linie, by opuszczał katalog ".." i wyświetlił:

 

.
.
..
kat1
kat2
kat3

 

Sorry, że tak męcze. :(

[Tymon]

Chyba nie rozumiem. Chcesz aby nie wyświetlał zawartości katalogów '..' i '.'?

 

EDIT

Znaczy ich nie przeszukiwał :)

 

Jeśli tak to w create musi mieć tak:

my_f = 0;
my_p = 0;
my_pos = 0;

//folder[n] - nazwa folderu n.
//plik[f,n] - nazwa pliku n w folderze f.
//
//fc - ilosc folderow.
//pc[fc] - ilosc plikow w folderze fc.
//
//dir - folder przeszukiwany

dir = 'folder'; //Wazne aby na koncu byl '\'!!!

fc = 0;
folder[fc] = file_find_first(dir+'*',fa_directory);

while(folder[fc] = '.' || folder[fc] = '..') 
{
    folder[fc] = file_find_next();
}

while(folder[fc] != '')
{   
    fc += 1;
    folder[fc] = file_find_next();
}

file_find_close();

for(f=0;f<fc;f+=1;)
{
    pc[f] = 0;
    plik[f,pc[f]] = file_find_first(dir+folder[f]+'\*',fa_directory);
    
    while(plik[f,pc[f]] = '.' || plik[f,pc[f]] = '..') 
    {
        plik[f,pc[f]] = file_find_next();
    }
    
    while(plik[f,pc[f]] != '')
    {
        pc[f] += 1;
        plik[f,pc[f]] = file_find_next();
    }
    
    file_find_close();
}

[Dawidsu]

Chciałbym skrypt, który w danym katalogu wyświetli po kolei jego zawartość (czyli pliki, podkatalogi i pliki w podkatalogach). Nie chcę, żeby wyświetlał tego, co jest o katalog wyżej (ten katalog zwie się "..").

Czyli mniej więcej tak:

Katalog1

Zawartość1

Katalog2

Zawartość2

etc....