Gerardo , mirando el ejemplo
del bbrowse "virtual column"
veo que tenes todo lo que necesitas

Si no tenes el ejemplo te lo mando

Jorge Accinelli

----- Original Message -----
From: "Gerardo J. Biagiotti" <gjbiagiotti@...>
To: <guvoaII@...>
Sent: Thursday, January 11, 2007 8:23 PM
Subject: RE: [guvoaII] bBrowser y CheckBox.

Con lo que me envió J.Accinelli, he creado una nueva columna con el
siguiente código:

//Genera una columna nueva no perteneciente a la DBF.

ocbExpression := bCodeBlock{"Expression",
SELF:oDCbB_Cheques:Server}

IF ocbExpression:Compile()

oColumn := bDataColumn{SELF:oDCbB_Cheques,
SELF:oDCbB_Cheques:Server,ocbExpression,#Expression}

SELF:oDCbB_Cheques:AddColumn(oColumn)

SELF:oDCbB_Cheques:OpenColumn(oColumn)

SELF:oDCbB_Cheques:ResizeColumnAuto(1)

ENDIF

Pero ahora necesito que todos los registros tengan el valor lógico FALSE, ya
que lo que muestra ahora es NIL.

Como puedo hacerlo???

Gerardo J. Biagiotti
Analista de Sistemas
(2580) Marcos Juárez
Córdoba - Argentina

Mail: gjbiagiotti@...
MSN: gerardo_biagiotti@...
gjbiagiotti@...
gjbiagiotti@...

De: guvoaII@... [mailto:guvoaII@...] En nombre
de Jorge Accinelli
Enviado el: Jueves, 11 de Enero de 2007 09:17 a.m.
Para: guvoaII@...
Asunto: Re: [guvoaII] bBrowser y CheckBox.

Una idea:

1) El bdatacolumn con #Expression y
un codeblock que devuelva un campo logico

2) En el CellEdit
bedit_create
Hacer algo que lo muestre como checkbox
(que empezaria, despues de identificar la columna)

oEvent:oEditControl := SELF:Browser:EditCreate etc
y los paramatros del help

Un poco mas abajo pego un fragmento sacado del comp lang
visual object, lo interesante es que la solucion finalmente la
da el creador de bbrowse con una clase que no esta
documentada, creo, bCodeBlock

De: Marcos Nogueira - ver perfil
Fecha: Mié 13 dic 2006 11:05
Correo electrónico: "Marcos Nogueira" <marcos.nogue...@...
<mailto:marcos.nogue...%40ig.com.br> >
Grupos: comp.lang.clipper.visual-objects
Sin calificarValoración:
mostrar opciones
Responder | Responder al autor | Reenviar | Imprimir | Mensaje individual |
Mostrar mensaje original | Notificar abuso | Buscar mensajes de este autor

Hello All,

> How do I change an expresison "on the fly"? Example: there is
> calculated column whose expression is PRICE*1.1. I can edit the
> formula, change its factor to 1.15 and assign it to the column, but the
> new result (PRICE*1.15) is not displayed - the browser still shows
> PRICE*1.1, no matter if I issue a Recalculate() afterwards. Any help is
> welcome.

Thanks to Joachim, who instructed me to use the undocumented class
bCodeBlock, the problem above is solved. For those who are interested:

LOCAL ocbExpression as bCodeBlock
...
ocbExpression := bCodeBlock{"<Expression>", oServer}
IF ocbExpression:Compile()
oColumn := bDataColumn{oBrowser,oServer,cbExpression,#Expression}
...
oBrowser:AddColumn(oColumn)
ENDIF

later...

oColumn := oBrowser:GetColumn(#CalcColumn)
ocbExpression := oColumn:Expression
ocbExpression:Expression := "<NewExpression>"
ocbExpression:Compile()
oBrowser:Refresh(True)

That's it. Thanks all for your interest and specially Joachim for his
support.

Marcos

Responder

----- Original Message -----
From: "Gerardo J. Biagiotti" <gjbiagiotti@...
<mailto:gjbiagiotti%40sicomnet.com.ar> >
To: <guvoaII@... <mailto:guvoaII%40gruposyahoo.com.ar> >
Sent: Thursday, January 11, 2007 12:04 AM
Subject: RE: [guvoaII] bBrowser y CheckBox.

Esto lo conozco, necesito agregar un CheckBox, fuera de los campos que tiene
la DBF.

Gerardo J. Biagiotti
Analista de Sistemas
(2580) Marcos Juárez
Córdoba - Argentina

Mail: gjbiagiotti@... <mailto:gjbiagiotti%40coyspu.com.ar>
MSN: gerardo_biagiotti@... <mailto:gerardo_biagiotti%40hotmail.com>
gjbiagiotti@... <mailto:gjbiagiotti%40gmail.com>
gjbiagiotti@... <mailto:gjbiagiotti%40yahoo.com.ar>

De: guvoaII@... <mailto:guvoaII%40gruposyahoo.com.ar>
[mailto:guvoaII@... <mailto:guvoaII%40gruposyahoo.com.ar> ]
En nombre
de Jorge Accinelli
Enviado el: Miércoles, 10 de Enero de 2007 11:19 p.m.
Para: guvoaII@... <mailto:guvoaII%40gruposyahoo.com.ar>
Asunto: Re: [guvoaII] bBrowser y CheckBox.

si el barrayserver o la dbf vinculada
al bbrowser tiene campos logicos, estos
son mostrados como checkbox si pones

SELF:browser:ViewLogicAs := #CheckBox

Si es que entendí bien la cuestion
Saludos
Jorge Accinelli

----- Original Message -----
From: "Gerardo J. Biagiotti" <gjbiagiotti@...
<mailto:gjbiagiotti%40sicomnet.com.ar>
<mailto:gjbiagiotti%40sicomnet.com.ar> >
To: "GUVOA II" <guvoaII@...
<mailto:guvoaII%40gruposyahoo.com.ar>
<mailto:guvoaII%40gruposyahoo.com.ar> >
Sent: Wednesday, January 10, 2007 7:18 PM
Subject: [guvoaII] bBrowser y CheckBox.

Necesito colocar un CheckBox en un Browser creado con bBrowser.

Como en una ListView.

Alguien podría tirarme un ejemplo?

Gracias.

Gerardo J. Biagiotti
Analista de Sistemas
(2580) Marcos Juárez
Córdoba - Argentina

Mail: gjbiagiotti@... <mailto:gjbiagiotti%40coyspu.com.ar>
<mailto:gjbiagiotti%40coyspu.com.ar>
MSN: gerardo_biagiotti@... <mailto:gerardo_biagiotti%40hotmail.com>
<mailto:gerardo_biagiotti%40hotmail.com>
gjbiagiotti@... <mailto:gjbiagiotti%40gmail.com>
<mailto:gjbiagiotti%40gmail.com>
gjbiagiotti@... <mailto:gjbiagiotti%40yahoo.com.ar>
<mailto:gjbiagiotti%40yahoo.com.ar>

__________ NOD32 1967 (20070109) Information __________

This message was checked by NOD32 antivirus system.
http://www.eset.com

__________ NOD32 1971 (20070110) Information __________

This message was checked by NOD32 antivirus system.
http://www.eset.com

__________ NOD32 1972 (20070111) Information __________

This message was checked by NOD32 antivirus system.
http://www.eset.com