https://foro.gambas-es.org/viewtopic.php?f=1&t=8123&p=48945#p48945 ----------------------------------- Shell Viernes, 26 Junio 2020, 13:27 Eliminar Un Objeto De Su Contenedor Padre ----------------------------------- Buenas!. Después de ver el mensaje de GambaFeliz en este post: [url=https://foro.gambas-es.org/viewtopic.php?f=1&t=8122&p=48935#p48935]Problema con los indices en un contenedor padre al eliminar objetos contenidos Antes de nada diré. ¿ No decimos que la propiedad Children devuelve una colección ?. ¿ Es realmente una colección o es un array ?. :roll: Aparenta ser más un array de controles, que no una colección de controles.. 8) Tengo un formulario con una matriz de n botones de ancho por n botones de alto. Y quiero eliminar o hacerlos "invisibles" con el ratón los que quiera. La parte importante es esta, pero fijaros en el comentario que digo de la propiedad visible del control botón y su padre Panel. Sobre todo es importante que tengamos en cuenta la propiedad "Tag". [code linenumbers=false syntax=gambas] Public Sub Observador_Click() Dim unboton As Button Dim indice As Integer indice = Last.tag For Each unboton In Panel1.Children 'Eliminar el botón del panel 'If unboton.tag = indice Then unboton.Delete ' ¿ Y si quieres hacerlo invisible ?. Si usas la propiedad visible, desparece de la vista del contenedor padre pero no evita que se redistribuyen los "niños" 'Entonces...y si lo hacemos invisible de otra forma...B-D If unboton.Tag = indice Then With unboton .Border = Border.None .Tag = "" .Text = "" End With Endif Next End [/code] Haciéndolos "invisibles" [img]https://foro.gambas-es.org/files/images/768/eliminarhaciendoinvisible.png[/img] Y eliminando los que queramos del panel. [img]https://foro.gambas-es.org/files/images/768/eliminandolodeltodo.png[/img] Saludos