Feliz Cumple Richard, un abrazote gufazo.

 

Pablo Sigüenza.

 

De: [email protected] [mailto:[email protected]] En nombre de Ricardo Aidelman
Enviado el: martes, 07 de octubre de 2014 12:36 p.m.
Para: GUFA List Member
Asunto: [GUFA] Control de muchos botones

 

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

Responder a