https://foro.gambas-es.org/viewtopic.php?f=1&t=1714&p=10031#p10031
-----------------------------------
shordi
Lunes, 04 Julio 2011, 10:23

Re: Agregar Evento A Un Array De Botones Creados Por Codigo??
-----------------------------------
Yo utilizo otra manera. Supón que creas un botón llamado bHacer que hace algo, claro:

[code linenumbers=false syntax=gambas]  bon = NEW Button(pn)
            bon.Text = "Añadir"
            bon.Width = 70
            bon.picture=... 'las propiedades que quieras.
            bon.Name = "bHacer" 
            bon.Action = "_" & bon.name                      'asigno un valor único a la propiedad Action del nuevo botón
       [/code]  

Y luego en la función Action_Activate del Formulario:

[code linenumbers=false syntax=gambas]PUBLIC SUB Action_Activate(key AS String) AS Boolean

     SELECT CASE key
   CASE "_bHacer"
       ..... lo que quieras que haga el botón.
[/code]

El código es una simplificación del que uso, pero la idea supongo que se ve clara.

suerte


