Hola Norberto:
Crea una colección en el formulario (Thisform.oColBotones, que se crea en el
Load() del form)
En el Init() de cada botón, pone:
Thisform.oColBotones.Add( This )
Luego, solo tenes que hacer:
For Each loBoton In Thisform.oColBotones
loBoton.BackColor(0,0,0)
EndFor
ricardo aidelman
( socio nº 1545 )
De: [email protected] [mailto:[email protected]] En nombre de Norberto Mario
Alvarez
Enviado el: martes, 07 de octubre de 2014 09:33 a.m.
Para: GUFA List Member
Asunto: [GUFA] Control de muchos botones
Estimados colisteros, quisiera saber si es posible y como. Paso a detallar
mi problema:
Tengo en un formulario muchos botones, por ejemplo 20 y cada uno de ellos
tiene como nombre B_1 al B_20, y a cada botón según una determinada
condición quiero cambiarle atributos (ejemplo el backcolor)
En vez de
THISFORM.B_1.BACKCOLOR(0,0,0)
THISFORM.B_2.BACKCOLOR(0,0,0)
.
THISFORM.B_19.BACKCOLOR(0,0,0)
THISFORM.B_20.BACKCOLOR(0,0,0)
Que sea:
FOR y = 1 TO 20
THISFORM.B_ y .BACKCOLOR(0,0,255)
ENDFOR
Desde ya muchas Gracias por vuestra atención.
Norberto Alvarez
Socio # 1892
Se certificó que el correo no contiene virus.
Comprobada por AVG - www.avg.es
Versión: 2014.0.4765 / Base de datos de virus: 4037/8343 - Fecha de la
versión: 07/10/2014
