Página 1 de 1

SOBRE LISTBOX Y dbfbrowse

Publicado: Vie Mar 11, 2005 6:58 pm
por Francisco Sanchez
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

SOBRE LISTBOX Y dbfbrowse

Publicado: Vie Mar 11, 2005 7:54 pm
por ignacio
Francisco,
Tienes que alimentar también la matriz oColum:aEditListBound. Seguro que
adivinas con que valores ;-)
Para más información mira la documentación de BrwColumn.txt
Un saludo,
"Francisco Sanchez" <francisco@softwaretotal.biz> escribió en el mensaje
news:4231dc56$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
> 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
>