SOBRE LISTBOX Y dbfbrowse
Publicado: Vie Mar 11, 2005 6:58 pm
Tengo una columna que en el bget le puse tipo listbox para que muestre una
lista desplegable con una serie de etiquetas a mostrar para que el usuario
seleccione una. Las etiquetas estan en un array, en el campo de la dbf tengo
que grabar un nº, que es la posicion en el array correspondiente. Al editar
cuando llega ahi me muestra la lista y al seleccionar el valor, seleccione
el que seleccione me pone una T y ya esta. Que hago mal? estoy haciendo lo
siguiente :
WITH OBJECT TDbfBRWColumn():New( oBrowse )
:cHeader := aHeaders[3]
:nWidth := 75
:cFieldName := "n_estado"
:OnGetData := {|oSender, cText, nImage| cText := If( !Empty( (
::cAliasTEMP )->n_estado ), ::aEstados[(::cAliasTEMP)->n_estado], ;
"" ) }
:nEditType := beGET_LISTBOX
:aEditListText := ::aEstados
:Create()
END
Un saludo : Francisco Sanchez
lista desplegable con una serie de etiquetas a mostrar para que el usuario
seleccione una. Las etiquetas estan en un array, en el campo de la dbf tengo
que grabar un nº, que es la posicion en el array correspondiente. Al editar
cuando llega ahi me muestra la lista y al seleccionar el valor, seleccione
el que seleccione me pone una T y ya esta. Que hago mal? estoy haciendo lo
siguiente :
WITH OBJECT TDbfBRWColumn():New( oBrowse )
:cHeader := aHeaders[3]
:nWidth := 75
:cFieldName := "n_estado"
:OnGetData := {|oSender, cText, nImage| cText := If( !Empty( (
::cAliasTEMP )->n_estado ), ::aEstados[(::cAliasTEMP)->n_estado], ;
"" ) }
:nEditType := beGET_LISTBOX
:aEditListText := ::aEstados
:Create()
END
Un saludo : Francisco Sanchez