relacionar una imagen con dirlist
como hago para mostrar una imagen en un cuadro al seleccionar en un dirlist.. de antemano mil gracias
Para empezar, el DirListBox solo muestra carpetas, te harÃa falta un FileListBox que se complemente y te muestre la lista de archivos de imagen de una ruta seleccionada desde el DirListBox
En el Evento Click del DirListBox pones lo siguiente
File1.Path = Disr1.Path
File1.Pattern = "*.jpg , *.bmp, *.gif"
File1.Refresh
En el evento Click del FileListBox
Dim Archivo as String
Archivo = dir1.Path & "" & file1.List(File1.ListIndex)
Picture1.Picture = LoadPicture(Archivo)
Saludos
En el Evento Click del DirListBox pones lo siguiente
File1.Path = Disr1.Path
File1.Pattern = "*.jpg , *.bmp, *.gif"
File1.Refresh
En el evento Click del FileListBox
Dim Archivo as String
Archivo = dir1.Path & "" & file1.List(File1.ListIndex)
Picture1.Picture = LoadPicture(Archivo)
Saludos
