Galería de fotos
Hola Baronclo!
Sigo con el proyecto de visualizador de fotos, lo tengo enfocado pero tengo un par de dudas con respecto al las listas.
Estoy haciendo una galería de fotos con Director, pero dicha galería debe ser ampliable en un futuro por cualquier usuario, por lo que tengo las imágenes en una carpeta externa y tengo un script (que envío abajo) para que al comenzar me obtenga todos los archivos almacenados en la carpeta.
1. Vería las miniaturas (15 según la plantilla) de las fotos incluidas en una carpeta externa. Con dos botones debo poder pasar a las siguientes 15 fotos de la lista obtenida al comenzar la película, el problema es que NO SÉ COMO INDICAR ESTO EN CÓDIGO LINGO
2. Al hacer click en cualquier foto se abre otra pantalla con la foto a tamaño completo y un botón de volver a la pantalla anterior, con las miniaturas. ¿Cómo me refiero al archivo en cuestión que tiene que abrirse? ¿Cuál es la forma más sencilla de plantearlo?
Aquí te envío el comienzo del script:
global fileList, myDirectory, fileCount
global currentSprite, spriteMember
on prepareMovie
member("myFileCount").text = "Loading..."
myDirectory = the moviepath & "images"
end
on startMovie
getFiles myDirectory
end
on stopMovie
repeat with i =1 to fileCount
member(i,2).erase()
end repeat
end
----------------------------------------------------------------------------------------------
-- IMPORT IMAGES
----------------------------------------------------------------------------------------------
on getFiles myDirectory
fileList = [ ]
repeat with i = 1 to 100
n = getNthFileNameInFolder(myDirectory, i)
if n = EMPTY then exit repeat
fileList.append(n)
importFileInto member i of castLib 2, myDirectory & "\" & getAt(fileList, i)
end repeat
fileCount = filelist.count
member("myFileCount").text = string(fileCount)
end
Sigo con el proyecto de visualizador de fotos, lo tengo enfocado pero tengo un par de dudas con respecto al las listas.
Estoy haciendo una galería de fotos con Director, pero dicha galería debe ser ampliable en un futuro por cualquier usuario, por lo que tengo las imágenes en una carpeta externa y tengo un script (que envío abajo) para que al comenzar me obtenga todos los archivos almacenados en la carpeta.
1. Vería las miniaturas (15 según la plantilla) de las fotos incluidas en una carpeta externa. Con dos botones debo poder pasar a las siguientes 15 fotos de la lista obtenida al comenzar la película, el problema es que NO SÉ COMO INDICAR ESTO EN CÓDIGO LINGO
2. Al hacer click en cualquier foto se abre otra pantalla con la foto a tamaño completo y un botón de volver a la pantalla anterior, con las miniaturas. ¿Cómo me refiero al archivo en cuestión que tiene que abrirse? ¿Cuál es la forma más sencilla de plantearlo?
Aquí te envío el comienzo del script:
global fileList, myDirectory, fileCount
global currentSprite, spriteMember
on prepareMovie
member("myFileCount").text = "Loading..."
myDirectory = the moviepath & "images"
end
on startMovie
getFiles myDirectory
end
on stopMovie
repeat with i =1 to fileCount
member(i,2).erase()
end repeat
end
----------------------------------------------------------------------------------------------
-- IMPORT IMAGES
----------------------------------------------------------------------------------------------
on getFiles myDirectory
fileList = [ ]
repeat with i = 1 to 100
n = getNthFileNameInFolder(myDirectory, i)
if n = EMPTY then exit repeat
fileList.append(n)
importFileInto member i of castLib 2, myDirectory & "\" & getAt(fileList, i)
end repeat
fileCount = filelist.count
member("myFileCount").text = string(fileCount)
end
1 respuesta
Respuesta de baronclo
1
