Hola a todos:

Bueno viendo q este punto no lo soporte C3, intente el siguiente codigo:

ZXC := 2
FINAL := substr(CTRL->ESPECIFICO,1,1)
do while ZXC <= 3
Ctrl := "::Op" + ltrim(Str(ZXC))
If (ctrl):State = cbChecked
FINAL := FINAL + "S"
Else
FINAL := FINAL + "N"
Endif
ZXC++
enddo

Bueno lo intente, pero no me funciono... me dice q no existe el metodo... a ver alguien tiene alguna solucion para esto?

Muchas gracias.
Pablo

Hola, Pablo.
No acabo de entender la finalidad de este codigo....
Lo que si veo, en principio, es que la linea:

If (ctrl):State = cbChecked

no puede funcionar. 'traducimos' a esto:

If ("::Op1"):State = cbChecked

...y no es codigo ejecutable....

prueba a poner

If (&ctrl):State = cbChecked

no he probado.... pero no creo que 'tire'.....

_________________
Un saludo.
Jesús P. Melgar Velasco

Efectivamente no funciona...

Es q la idea es q si yo tengo varios checkbox para por ejemplo controlar los accesos q un usuario puede tener a las diferentes partes de un programa, voy clicanco en cada una y al final salvo eso en un dbf... para no tener q hacer esto:

If ::Op1:State = cbChecked
FINAL := FINAL + "S"
Else
FINAL := FINAL + "N"
Endif

If ::Op2:State = cbChecked
FINAL := FINAL + "S"
Else
FINAL := FINAL + "N"
Endif

y colocar codigo para cada checked podia hacer asi:

do while ZXC <= 3
Ctrl := "::Op" + ltrim(Str(ZXC))
If (ctrl):State = cbChecked
FINAL := FINAL + "S"
Else
FINAL := FINAL + "N"
Endif
ZXC++
enddo

y ahorrarme un monton de codigo... imagino q alguien ya ha querido hacer esto me digan si hay alguna forma de hacerlo o si puede ser posible el uso de array de controles en el futuro...

Saludos
Pablo

Pablo,

No pudes hacer eso, las macros sólo funcionan con variables públicas y privadas.

_________________
Un saludo,
Bruno Cantero
www.c3compiler.com