Algo raro con Combobox
Publicado: Sab May 23, 2009 4:57 pm
Al abrir un Combobox, y escoger de la lista desplegada un elemento haciendo
"Click" con el botón izquierdo del ratón, asigno a ::oCombobox1:cText a
través del evento OnChange el valor del elemnto seleccionado de la siguiente
forma:
//---------------------------------------------------------- --------------------
METHOD FormInitialize( oSender ) CLASS TForm1
::nStyle := csDROPDOWNLIST // LISTA NO EDITABLE
::oCombobox1:cText := '' // LO INICIALIZO
RETURN Nil
//---------------------------------------------------------- --------------------
METHOD Combobox1Change( oSender, nIndex, nOldIndex ) CLASS TForm1
::oCombobox1:cText := ::oCombobox1:aItems[nIndex]
RETURN Nil
//---------------------------------------------------------- --------------------
Lo raro es que al dejar el foco del ::oCombobox1 el valor asignado a
::oCombobox:cText se pierde inexplicablemente.
¿Porque sucede esto?
Espero haberme explicado
Guillermo
"Click" con el botón izquierdo del ratón, asigno a ::oCombobox1:cText a
través del evento OnChange el valor del elemnto seleccionado de la siguiente
forma:
//---------------------------------------------------------- --------------------
METHOD FormInitialize( oSender ) CLASS TForm1
::nStyle := csDROPDOWNLIST // LISTA NO EDITABLE
::oCombobox1:cText := '' // LO INICIALIZO
RETURN Nil
//---------------------------------------------------------- --------------------
METHOD Combobox1Change( oSender, nIndex, nOldIndex ) CLASS TForm1
::oCombobox1:cText := ::oCombobox1:aItems[nIndex]
RETURN Nil
//---------------------------------------------------------- --------------------
Lo raro es que al dejar el foco del ::oCombobox1 el valor asignado a
::oCombobox:cText se pierde inexplicablemente.
¿Porque sucede esto?
Espero haberme explicado
Guillermo