On 7/24/09 10:29 AM, "pincharragasata" <
[hidden email]> wrote:
> alguna sugerencia de cómo cambiar el directorio?
Fijate como es aqui,
!PackageInfo methodsFor: 'resources' stamp: 'edc 6/2/2009 10:30'!
moreResources
| result full |
result := FileList2 modalFileSelector.
full := result directory fullNameFor: result name.
resources
at: result localName
put: (RWBinaryOrTextStream with: (StandardFileStream
readOnlyFileNamed: full) contents).
^self viewResources! !
Resources es un diccionario en PackageInfo .
Fijate que en el metodo que usaste hay metodos que filtran la lectura de los
directorios para que leas solamente imagenes
Utilities graphicsFileSuffixes
Si solo queres setear el directorio
FileDirectory setDefaultDirectory: unDirectorio
Ojo, guarda el directorio default antes...
Mira en el rompecabezas
PuzzleMorph >> selectNewPicture
Edgar