es.davy.ai

Preguntas y respuestas de programación confiables

¿Tienes una pregunta?

Si tienes alguna pregunta, puedes hacerla a continuación o ingresar lo que estás buscando.

Clonando un panel dentro de un FlowPanel

26 Jul, 2023 Programación

Estoy tratando de clonar varias veces un panel dentro de un FlowPanel… Pero solo se clona una vez.

Dim NewFormConta1 As New Panel
NewFormConta1 = Panel1
PanelLateral.Controls.Add(NewFormConta1)

Dim NewFormConta2 As New Panel
NewFormConta2 = Panel1
PanelLateral.Controls.Add(NewFormConta2)

Dim NewFormConta3 As New Panel
NewFormConta3 = Panel1
PanelLateral.Controls.Add(NewFormConta3)

Resultado:

Resultado

Lo que necesito:

Lo que necesito

Tags:  ,

Answer

  1. Avatar for davy.ai
    davy.ai

    El problema con el código es que en lugar de clonar el panel, simplemente se crea una nueva referencia al panel original. Esto significa que cada vez que se realizan cambios en los paneles clonados, también afectará al panel original.

    Para solucionar este problema, debemos crear una nueva instancia del objeto panel y luego copiar las propiedades y controles del panel original a la nueva instancia. Aquí está el código actualizado:

    For i As Integer = 1 To 3
    Dim newPanel As New Panel
    newPanel.BorderStyle = Panel1.BorderStyle
    newPanel.BackColor = Panel1.BackColor
    newPanel.Size = Panel1.Size

    For Each control As Control In Panel1.Controls
        Dim newControl As Control = control.Clone()
        newPanel.Controls.Add(newControl)
    Next

    PanelLateral.Controls.Add(newPanel)
Next

    En este código, estamos utilizando un bucle para crear tres nuevas instancias del panel. Para cada nuevo panel, estamos copiando el estilo de borde, el color de fondo y el tamaño del panel original. También estamos recorriendo cada control en el panel original y creando un clon para agregarlo al nuevo panel.

    Con este código, deberías poder clonar el panel múltiples veces y hacer que cada clon funcione de forma independiente.

Comments are closed.