FoxPro/Visual FoxPro - Problema con ListBox

 
Vista:

Problema con ListBox

Publicado por Gabriel (427 intervenciones) el 08/01/2008 12:44:54
Que tal amigos :

No logro resolver el problema en el ListBox ( LstSeleccionar ) al momento de mover un Item al 2do. ListBox ( LstProgramado ). Estoy utilizando un boton de comando llamado CmdAgregar que utilizo para mover el ITEM seleccionado al 2do. ListBox( LstProgramado ) solo me muestra el ICONO del picture asociado mas no aparece visible el ITEM...

Aqui muestro el codigo que estoy utilizando en el boton de comando.

cCurso = Thisform.LstSeleccionar.Value
nCurso = Thisform.LstSeleccionar.ListIndex
If Thisform.LstSeleccionar.ListCount > 0 Then
Thisform.LstProgramado.AddItem(cCurso) && Aqui el
problema
Thisform.LstSeleccionar.RemoveItem(nCurso)
Thisform.LstSeleccionar.ListIndex = 0
Thisform.CmdAgregar.Enabled = .F.
Thisform.LstProgramado.Gotfocus()
Endif
Thisform.Refresh

Y este es el codigo que utilizo para cargar los datos al ListBox

Select 2
SCAN
Thisform.LstSeleccionar.AddListItem(ALLTRIM(PROPER(Ape_Alum)) + ", " + PROPER(nom_alum)
Thisform.LstSeleccionar.Requery()
Thisform.LstSeleccionar.Refresh()
ENDSCAN

Agradezco amigos sus comentarios y/o sugerencias...

Saludos,
GABRIEL
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder