Programación General > Visual Basic 6.0 e inferiores

 Re: Ejecutar iconos de un ListView

(1/2) > >>

José D:
Hola:

Por casualidad alguien sabe cómo ejecutar los iconos de un ListView, que al dar doble click a un icono de un ListView se ejecute lo programado para dicho icono.

Muchas gracias a todos por leerme y saludos.:)

José D:

Jose Arriagada:
A que te refieres precisamente con "ejecutar"?

Sera que deseas, que cuando un usuario presione un icono del listview, se active algun proceso?

Si es asi, entonces, prueba lo siguiente:

Se supone que tenemos un listview1 enlazado a un imagelist1 (con 4 iconos)

Inserta este codigo en tu form:

Private Sub Form_Load()
'Cargo los iconos al listview
'Recuerda que el formato de entrada del icono al listview es: Indice, Clave, Texto, Icono
ListView1.ListItems.Add 1, "Agregar", "Agregar registro", 1
ListView1.ListItems.Add 2, "Editar", "Modificar registro", 2
ListView1.ListItems.Add 3, "Eliminar", "Eliminar registro", 3
ListView1.ListItems.Add 4, "Cancelar", "Cancelar", 4
End Sub

Private Sub ListView1_Click()
'Nos muestra la clave y texto del icono presionado.

msg = ListView1.SelectedItem.Key & vbLf
msg = msg & ListView1.SelectedItem.Text
MsgBox msg
'En esta parte puedes colocar tu codigo que desees:
'Puede ser de la forma:
'select case listview1.selecteditem.key
' case "Agregar":
'                     xcxxxxxxcskdjflsjd sdf
'                     lsdjflskdjfl sjkdflsjdfl sd
'case "Editar":
'                     xcxxxxxxcskdjflsjd sdf
'                     lsdjflskdjfl sjkdflsjdfl sd
'case "Eliminar":
'                     xcxxxxxxcskdjflsjd sdf
'                     lsdjflskdjfl sjkdflsjdfl sd
' case "Cancelar":
'                     xcxxxxxxcskdjflsjd sdf
'                     lsdjflskdjfl sjkdflsjdfl sd
'end select                
End Sub


Espero que sirva

José D:
:D Muchas gracias José ya funciona, lo que pasa es que este pasado fin de semana es que he empezado a ver sobre este control y por eso no lo conozco bien.  Lo que pasa es que estoy haciendo un mini Escritorio de windows personalizado, para tener lo mio a parte y no tener el escritorio tan abarrotado de iconos, es algo sencillo, y eso era todo lo que le faltaba.

Muchas gracias Jose Arriagada.

Y de una vez pregunto, es posible hacer que la barra se despliege hacia arriba en vez de hacia abajo con un botón de un control Toolbar, porque sólo lo hace si se pone al pie de la barra de tareas original de windows, y más complejo aun, es posible o no hacer un submenú para Programas, así como el de windows:
Inicio->Programas->"Todo lo demás"

Como de seguro este control no puede, si sabes de algún otro control que sea mejor, por favor notifiquenmelo quien sepa, sino, no importa, al menos esto era lo que tenía en mente.

PD: Aquí está la idea de la cuestión para no tener que hacer ¿¡¡¡plop!!!? que no sé qué significa.

Gerard:
Este pequenyo escritorio és muy original!!
Felicidades!
Salud2

Navegación

[0] Índice de Mensajes

[#] Página Siguiente