Xailer & OZ Software

Estimados Consultores:
Diseñe un Dbfbrowse con 8 columnas, la columna 8 quiero asignarle en el
proceso de ejecución el valor de un campo o ponerla no visible, el código
que uso el el siguiente:
WITH OBJECT ::oDbfBrowseInfAct
SWITCH ::nComDat
CASE 1
:aCols[8]:lVisible := .F.
EXIT
CASE 2
WITH OBJECT :aCols[8]
:lVisible := .T.
:cHeader := "Uni.Med."
:nAlignment := taRIGHT
:nWidth := 70
:cFieldName := UNIDAD
END
EXIT
CASE 3
WITH OBJECT :aCols[8]
:lVisible := .T.
:cHeader := "Valor"
:nAlignment := taRIGHT
:nWidth := 90
:cFieldName := VALOR
END
END
Al ejecutarce el programa si selecciono opcion 1, se hace invisible la
columna ocho, con la opcion 2 y 3 se ejecutan:
lVisible, cHeader, nAlignment y nWidth correctamente, sin embargo el valor
del campo que deseo desplegar en la columna no se visualiza, que se necesita
hacer para que lo despliegue en función a la seleccion. Por su ayuda.
Gracias.
--
Ing. Francisco González Herrera
Comunicaciones Satelitales y Redes, S.A. de C.V.
56-78-16-66

Buenos días,
Sólo puede asignar a la propiedad TBrwColumn:cFieldName antes de hacer la
llamada a TDbfBrowse:SetDbf() que es cuando se resuelve el nombre. En el
resto de los casos deberá usar el evento TBrwColumn:OnGetData.
Un saludo,
"Ing. Francisco Gonzälez Herrera" <fglez@csyredes.com> escribió en el
mensaje news:[email=4a5d036b@svctag-j7w3v3j....]4a5d036b@svctag-j7w3v3j....[/email]
> Estimados Consultores:
>
> Diseñe un Dbfbrowse con 8 columnas, la columna 8 quiero asignarle en el
> proceso de ejecución el valor de un campo o ponerla no visible, el código
> que uso el el siguiente:
>
> WITH OBJECT ::oDbfBrowseInfAct
> SWITCH ::nComDat
> CASE 1
> :aCols[8]:lVisible := .F.
> EXIT
> CASE 2
> WITH OBJECT :aCols[8]
> :lVisible := .T.
> :cHeader := "Uni.Med."
> :nAlignment := taRIGHT
> :nWidth := 70
> :cFieldName := UNIDAD
> END
> EXIT
> CASE 3
> WITH OBJECT :aCols[8]
> :lVisible := .T.
> :cHeader := "Valor"
> :nAlignment := taRIGHT
> :nWidth := 90
> :cFieldName := VALOR
> END
> END
>
> Al ejecutarce el programa si selecciono opcion 1, se hace invisible la
> columna ocho, con la opcion 2 y 3 se ejecutan:
> lVisible, cHeader, nAlignment y nWidth correctamente, sin embargo el valor
> del campo que deseo desplegar en la columna no se visualiza, que se
> necesita hacer para que lo despliegue en función a la seleccion. Por su
> ayuda. Gracias.
>
> --
> Ing. Francisco González Herrera
> Comunicaciones Satelitales y Redes, S.A. de C.V.
> 56-78-16-66
>