Ejemplos usando el Api de windows para Visual basic

43 - Ejemplo de explorador de archivos que muestra los íconos asociados - Api SendMessage

<Volver> - Anterior - Siguiente



 

 

 

 

Contenido

 

 

 


Ejemplo 1

Este muy buen ejemplo fue aportado por el amigo Leandro Ascierto

Lo que hace es poder listar en un control ListView los archivos y directorios como lo hace el explorador de Windows, es decir mostrando los íconos asociados a cada tipo de archivo en un control ListView

Explorador de windows con visual basic


Una cosa importante es que para este ejemplo se debe utilizar el Control ListView que se agrega desde componentes Microsoft Windows Common Controls 5.0, y no el 6.0 clásico, ya que si no no funcionará.

Agregar un Control Drive1, un Dir1, un File1 y un ListView1

Nota: La velocidad de carga es bastante rápida, por ejempo al listar el directorio System32 que contiene muchos archivos y directorios, tardó solo 2 segundos.

 

Código fuente en el formulario

 


Ejemplo 2

El mismo ejemplo pero usando el Api para buscar los archivos

Acá un ejemplo similar al anterior, pero en ves de usar la función Dir del Visual Basic para listar los archivos y directorios, utiliza el Api de Windows.

Esto lo hice para comprobar si era mas rápido, aunque no noté diferencia, no porque el Api sea mas lenta, si no porque posiblemente la velocidad no pase por este tema, ..si no por el proceso que agrega mediante SendMessage los Items en el ListView

En un formulario:

En un módulo bas

 


Recursos relacionados



Buscar en Recursos vb