Analista de Sistemas
Publicado por Gerardo Flores L (10 intervenciones) el 19/02/2004 20:16:26
Busquedas de un texto dentro de un ListView control
ListViewItem lvi
lvi.Label = "First~tSecond~tThird"
lv_1.AddItem( lvi )
Tengo un Data Store que me trae el campo First, Second y Third, despues los agrego con el additem a mi control ListView para crear mi lista.
Ahora, yo quiero buscar dentro de la lista el campo Third, Second o First , Estoy tratando con la funcion FindItem pero esta solo funcion solo me encuentra el campo First cuando yo busco el campo second o third no los encuentra
Pregunta: Uds. saben como puedo hacer una busqueda de un texto dentro de un ListView control
Esta es mi funcion Get_Find()
Open(w_get_text) - Captura de texto para buscar en el ListView Control
ls_label = Message.StringParm
IF ls_label = "" THEN
RETURN
ELSE
li_index = lv_1.FindItem(0,ls_label, TRUE,TRUE)
END IF
IF li_index = -1 THEN
MessageBox("MESSAGE ERROR", "Item Not Found ..!!!",Exclamation!)
ELSE
lv_1.GetItem (li_index, l_lvi )
l_lvi.HasFocus = TRUE
l_lvi.Selected = TRUE
lv_1.SetItem(li_index,l_lvi)
END IF
Por su ayuda Gracias.
ListViewItem lvi
lvi.Label = "First~tSecond~tThird"
lv_1.AddItem( lvi )
Tengo un Data Store que me trae el campo First, Second y Third, despues los agrego con el additem a mi control ListView para crear mi lista.
Ahora, yo quiero buscar dentro de la lista el campo Third, Second o First , Estoy tratando con la funcion FindItem pero esta solo funcion solo me encuentra el campo First cuando yo busco el campo second o third no los encuentra
Pregunta: Uds. saben como puedo hacer una busqueda de un texto dentro de un ListView control
Esta es mi funcion Get_Find()
Open(w_get_text) - Captura de texto para buscar en el ListView Control
ls_label = Message.StringParm
IF ls_label = "" THEN
RETURN
ELSE
li_index = lv_1.FindItem(0,ls_label, TRUE,TRUE)
END IF
IF li_index = -1 THEN
MessageBox("MESSAGE ERROR", "Item Not Found ..!!!",Exclamation!)
ELSE
lv_1.GetItem (li_index, l_lvi )
l_lvi.HasFocus = TRUE
l_lvi.Selected = TRUE
lv_1.SetItem(li_index,l_lvi)
END IF
Por su ayuda Gracias.
Valora esta pregunta


0