Ayuda con Multiples Listboxs !!
Isi
29 de Abril del 2004
tengo varios listboxs y necesito que cuando bajo con el scroll los datos de uno me los baje igual en los otros... es esto posible???
AILAM
29 de Abril del 2004
yo te recomiendo mejor que en el evento de seleccion del primer listbox ... pongas el codigo para que cambie el segundo ... por que hacerlos al mismo tiempo . ....seria complicarte la vidad ...el segundo de donde sacalos datos de una bd?
explica un poco mas el asunto
explica un poco mas el asunto
Isi
29 de Abril del 2004
el tema es asi:
Tengo 4 listbox que se van llenado solos mediante un bucle, me va mostrando los datos de una consulta al mysql mediate el use de un recordset, pero el tema es que cuando se llenan los listbox empiezan a "scrollear" para abajo, y tengo dos problemas, no me muestra el ultimo articulo y cuando quiero bajar con uno deberian bajar los otros 3.. desde ya gracias por la ayuda
Tengo 4 listbox que se van llenado solos mediante un bucle, me va mostrando los datos de una consulta al mysql mediate el use de un recordset, pero el tema es que cuando se llenan los listbox empiezan a "scrollear" para abajo, y tengo dos problemas, no me muestra el ultimo articulo y cuando quiero bajar con uno deberian bajar los otros 3.. desde ya gracias por la ayuda
en?
29 de Abril del 2004
No sé si será imposible, que yo sepa directamente no, y si existe una API o otra forma, no la conozco, pero te puedo dar una idea de cómo lo harÃa yo.
Primero, en lugar de usar ListBox, lo harÃa con ListView, con la propiedad View = lwReport, y una columna del tamaño necesario.
Luego inserta un PictureBox, y lo situas en la posición en la que se encontrará el ScrollBar del ListView.
Agregas un VScrollBar en el PictureBox, y le das el tamaño apropiado.
Entonces, cuando llenes los ListView, le asignas al VScrollBar.Max = ListView1.ListItems.Count
Los eventos del Scroll serÃan:
Private Sub VScroll1_Change()
Call VScroll1_Scroll
End Sub
Private Sub VScroll1_Scroll()
ListView1.ListItems(VScroll1.Value).EnsureVisible
ListView2.ListItems(VScroll1.Value).EnsureVisible
ListView3.ListItems(VScroll1.Value).EnsureVisible
End Sub
Y el evento para ListView
Private Sub ListView1_ItemClick(ByVal Item As MSComctlLib.ListItem)
VScroll1.Value = Item.Index
Mejor si trabajas los ListView y los VScroll como matrices de controles.
Yo trabajarÃa sobre esa idea, puedes probar.
Saludos.
Primero, en lugar de usar ListBox, lo harÃa con ListView, con la propiedad View = lwReport, y una columna del tamaño necesario.
Luego inserta un PictureBox, y lo situas en la posición en la que se encontrará el ScrollBar del ListView.
Agregas un VScrollBar en el PictureBox, y le das el tamaño apropiado.
Entonces, cuando llenes los ListView, le asignas al VScrollBar.Max = ListView1.ListItems.Count
Los eventos del Scroll serÃan:
Private Sub VScroll1_Change()
Call VScroll1_Scroll
End Sub
Private Sub VScroll1_Scroll()
ListView1.ListItems(VScroll1.Value).EnsureVisible
ListView2.ListItems(VScroll1.Value).EnsureVisible
ListView3.ListItems(VScroll1.Value).EnsureVisible
End Sub
Y el evento para ListView
Private Sub ListView1_ItemClick(ByVal Item As MSComctlLib.ListItem)
VScroll1.Value = Item.Index
Mejor si trabajas los ListView y los VScroll como matrices de controles.
Yo trabajarÃa sobre esa idea, puedes probar.
Saludos.