[PD] back to dir access

[Krzysztof Czaja]

hi tom,

try getting them one-by-one (perhaps, automate with a counter).
In the scriptlet, change ".(set res.)" to ".(lindex $res $3.)"
and drive that by [pack s s 0].

In essence, using tot to get directory listing is like taking
a paraglider to visit a shop next street...

sztof

tom wrote:
> I wanted to work a bit on directory listing with TOT because I use
> WINXP. I built this patch, but it crashes often and relies on too many
...
> this is a bit cryptic, but hopefully works:
> 
> query set dir [tk_chooseDirectory] .: if .($dir != "" && ![catch .(glob
> [file join $dir *.txt].) res].) .(set res.)
> 
> Send this to a [tot .] -> [route bang] and read from the right
> outlet of the route.
> 
> The trickier problem is, how to deal with large lists of filenames
> -- there is a limit imposed by the pdgui->pd connection.  I think
> one way would be to metro-out the filenames one-by-one?  Or store
> them in a temporary file to be read into a [textfile]?
> 
> Seems like it is a hard time without a [folder] clone...