falsche Dateiauflistung
Übersicht
BlitzBasic
Beginners-Corner|
|
juse4proBetreff: falsche Dateiauflistung |
Antworten mit Zitat |
|---|---|---|
|
hi,
ich glaube, dass meine überschrift erklärt was ich für probs habe... ich habe im durchsuchtem Ordner, genau 1 Ordner dieser wird aber hier nicht in den DIM gespeichert hier mal der Code: [AUSKLAPPEN] Dim weapon_paths$(32)
Function SearchForWeapons() Local i Local file$ Local dir=ReadDir("weapons\") For z=0 To 32 weapon_paths$(z)="" Next Repeat file$=NextFile(dir) If FileType("weapons\"+file$) = 2 Then weapon_paths$(i)=file$ If i<32 Then i=i+1 Print file EndIf If file$="" Then finish=1 Until finish=1 For z=0 To 32 Print weapon_paths$(z) Next WaitKey End Function SearchForWeapons() wieso? help |
||
| Portfolio |LinkedIn |XING | ||
|
|
Eingeproggt |
Antworten mit Zitat |
|---|---|---|
Du musst für FileType einen absoluten Pfad angeben. Siehe CurrentDir .
mfG, Christoph |
||
|
|
juse4pro |
Antworten mit Zitat |
|---|---|---|
|
funtz leider immer noch net:
Code: [AUSKLAPPEN] If FileType(CurrentDir$()+"weapons\"+file$) = 2 Then |
||
| Portfolio |LinkedIn |XING | ||
Übersicht
BlitzBasic
Beginners-Corner
Powered by phpBB © 2001 - 2006, phpBB Group

