Een array arrFileNames moet gevuld worden met de namen van de bestanden uit een directory sDirectory.
En hoewel je de directory kan gaan doorlopen en één voor één de namen uitlezen en in een array toevoegen met “insert’, bestaat er een snelle en handige manier in gambas met “Dir“, dat een array teruggeeft op een selectie van bestanden:
aFiles = Dir(sDirectory, "*.txt")
Voorbeeld van uitlezen van beelden en opeenvolgend tonen in bestaande Picturebox1 :
DIM s AS String ... TRY aFiles = Dir(sDirectory, "*.png") IF ERROR DEBUG Error.Text ELSE FOR EACH s IN aFiles Picturebox1.Picture = Picture.Load(sDirectory &/ s) Message.Info(s) ' toon bestandsnaam en wacht NEXT ENDIF