Hola, pareciera q es un bug,depende del comodin a buscar que q le pases como
reacciona.

http://groups.google.com.ar/group/fido7.ru.smalltalk/browse_thread/thread/98
d7281480579c12/caa218bdf43d006c?lnk=st&q=File%3E%3Efor:in:do:+smalltalk&rnum
=2&hl=es#caa218bdf43d006c

http://groups.google.com.ar/group/comp.lang.smalltalk.dolphin/browse_thread/
thread/a2f699d63c259995/5c459462a3cd38d8?lnk=st&q=for:in:+do:+dolphin+smallt
alk&rnum=5&hl=es#5c459462a3cd38d8


Si buscas el nombre de los archivos dentro de un directorio se podria
solucionar (como yo lo veo !!).

unaColeccion:= OrderedCollection new.
File
        for: '*.txt'
        in: 'C:\temp\'
        do: [:each | unaColeccion add: each  fileName ].


Una pregunta sobre tu ejemplos.

Para que le preguntas a cada file (file path) que path tiene ?. Ya  lo sabes
antes de preguntar ( c:\TempDir\).
Es para tener todo juntito?


>| col1 |
>col1 := OrderedCollection new.
>File for: '*' in: 'c:\TempDir\' do: [ :file | col1 add: file path ].
>col1 inspect

Con respecto a WIN32_FIND_DATA, ni idea (por lo menos yo), habria q navegar
un poco por el dolphin y ver como tratan los files o preguntar a los q
saben.


Saludos,
Gustavo.-

-----Mensaje original-----
De: [email protected] [mailto:[EMAIL PROTECTED]
nombre de Okushi
Enviado el: Sábado, 22 de Octubre de 2005 01:33 p.m.
Para: [email protected]
Asunto: [clubSmalltalk] Lista de archivos en Dolphin


Buenas y santas.
Estuve jugueteando un poco con Dolphin y no se si es la falta de
acostumbramiento, pero encontre algunas cosas bastante incomodas (Y otras
bastante comodas pero esas son aburridas de mencionar :P).

Por ejemplo, al intentar listar los archivos dentro de un directorio tuve
que dar varias vueltas, haciendo varias pruebas llegue a que:

(Asumiendo que existe c:\TempDir\ con archivos cualesquiera dentro)

| col1 |
col1 := OrderedCollection new.
File for: '*' in: 'c:\TempDir\' do: [ :file | col1 add: file path ].
col1 inspect

Me devuelve una coleccion con strings, cada uno representando el nombre de
los archivos dentro de c:\TempDir\.
Pero ete aqui que:

| col1 col2 |
col1 := OrderedCollection new.
col2 := OrderedCollection new.
File for: '*' in: 'c:\TempDir\' do: [ :file | col1 add: file ].
col1 do: [ :file | col2 add: file path ].
col2 inspect

Me devuelve una coleccion con la misma cantidad de elementos que la
coleccion anterior pero repitiendo el primer archivo que encuentra.
Hay varias deducciones que saque de esto pero no quiero que el mail se
extienda mas de 7 paginas.

Mi pregunta para los dolphineros es, hay alguna forma mas simple de obtener
los archivos (instancias de File si es posible, y no de WIN32_FIND_DATA) mas
simple ?
No seria mas logico instanciar un Folder y pedirle #content o simil ?
(Encontre el protocolo de Folder algo reducido).

Obviamente le estoy pifiando en algo.

Saludos y agradecimientos camaradas !

Rusty.

Responder a