Crear componente en tiempo de ejecución
Hola a todos.
Necesito crear componente en tiempo de ejecución, pero no sé cómo hacerlo. No me vale con definirlos en tiempo de diseño y luego ponerlos visibles.... porque no sé cuántos tengo que quear en un principio...
¿Podeis ayudarme?
Gracias de antemano. Saludos.
Necesito crear componente en tiempo de ejecución, pero no sé cómo hacerlo. No me vale con definirlos en tiempo de diseño y luego ponerlos visibles.... porque no sé cuántos tengo que quear en un principio...
¿Podeis ayudarme?
Gracias de antemano. Saludos.
Monica, crea un array de controles con el componente que quieras.
Para eso tan sólo tienes que insertar 1 de los que quieras, te pondré un ejemplo con un TextBox.
Cuando tengas el que se crea por defecto, (Text1), le pones en la propiedad Index=0
Para que veas como funciona, agrega un Command1, con el siguiente código:
Private Sub Command1_Click()
Load Text1(Text1.UBound + 1)
With Text1(Text1.UBound)
.Top = Text1(Text1.UBound -1).Top + .Height
.Visible = True
End With
End Sub
--
Un saludo.
Para eso tan sólo tienes que insertar 1 de los que quieras, te pondré un ejemplo con un TextBox.
Cuando tengas el que se crea por defecto, (Text1), le pones en la propiedad Index=0
Para que veas como funciona, agrega un Command1, con el siguiente código:
Private Sub Command1_Click()
Load Text1(Text1.UBound + 1)
With Text1(Text1.UBound)
.Top = Text1(Text1.UBound -1).Top + .Height
.Visible = True
End With
End Sub
--
Un saludo.
