FoxPro/Visual FoxPro - Rutina Command Visible=.F.

 
Vista:

Rutina Command Visible=.F.

Publicado por Amado Garcia L. (63 intervenciones) el 03/04/2008 17:45:29
hola necesito de alguna rutinita para volver invisible una serie de command

ejemplo

local cn
For cn = 2 to 7
cn=STR(cn)
Thisform.Command&cn.visible=.F. && Sustituyendo la variable "cn"
endfor & puede ser también next....??

bbbbbuuuuu.... no me funciona.... alguien tiene una idea exacta...

gracias a todos...
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Rutina Command Visible=.F.

Publicado por enrique (1041 intervenciones) el 03/04/2008 17:56:36
Prueba así

For cn = 1 to 3
cn1=allt(STR(cn))
Thisform.Command&cn1..visible=.F.
endfor
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Rutina Command Visible=.F.

Publicado por jorge (423 intervenciones) el 03/04/2008 18:08:52
Hola amigos
Intenta mejor con esta rutina, te sirve para cualquier tipo de objeto u objetos

nindice = thisform.controlcount
for indice = 1 to nindice
if ATC(thisform.controls[m.indice].BaseClass,"commandbutton")#0
thisform.controls[m.indice].visible=.f.
endif

next indice
thisform.refresh

Saludos
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar