Xailer forum

Publicado: **Mié Mar 29, 2023 11:22 pm**

Xailer team:

En control DBCombobox MODerno no guarda lo que el usuario teclea libremente...

Sobre el SAMPLE: \Xailer8.2\Samples\Modern\ComboBox

Tomando el DBComboboxMod

:lFreeEdit := .T. // se requiere que el usuario pueda introducir un texto que no se muestra en la lista
:nDataType := dtSTRING // para asegurarnos que el tipo es solo cadena de texto
:oDataField := Last // asociado a un campo
:onCreate := DBComboboxMod1Create
:onExit := DBComboboxMod1Exit // evento porque se requiere validar lo capturado

METHOD DBComboboxMod1Create( oSender ) CLASS TForm1
oSender:aItems := {"bingen", "fredy", "pedro"} // <<=== Opciones de texto que se necesitan cargar en tiempo de ejecución
RETURN Nil

METHOD DBComboboxMod1Exit( oSender, oNextCtl ) CLASS TForm1
LogDebug( oSender:Value() ) << === muestra VACIO aún cuando se ha tecleado texto
RETURN Nil

NO GUARDA EL TEXTO QUE EL USUARIO HA TECLEADO LIBREMENTE

Publicado: **Jue Mar 30, 2023 7:45 pm**

Código: Seleccionar todo

METHOD GetText( nIndex ) CLASS xComboBoxMod

   LOCAL cText

   IF PCount() == 0 .OR. ( (nIndex == 0 ) .AND. ::lFreeEdit )
      RETURN ::Super:GetText()
   ENDIF

   DEFAULT nIndex TO 0

   IF nIndex > 0 .AND. nIndex <= Len( ::aItems )
      cText := ::aItems[ nIndex ]
   ELSE
      cText := ""
   ENDIF

RETURN cText

Gracias.

Publicado: **Vie Mar 31, 2023 7:31 pm**

Igancio,

Ya funciona, oSender:Value() ya regresa el valor del control

gracias

Xailer forum

oDBComboboxMod:Value() regresa vacío

oDBComboboxMod:Value() regresa vacío

Re: oDBComboboxMod:Value() regresa vacío

Re: oDBComboboxMod:Value() regresa vacío