HtmlElement.CanHaveChildren Propiedad

Definición

Espacio de nombres:

System.Windows.Forms

Ensamblado:

System.Windows.Forms.dll

Obtiene un valor que indica si este elemento puede tener elementos secundarios.

public:
 property bool CanHaveChildren { bool get(); };

public bool CanHaveChildren { get; }

member this.CanHaveChildren : bool

Public ReadOnly Property CanHaveChildren As Boolean

Valor de propiedad

Boolean

Es true si el elemento puede tener elementos secundarios; en caso contrario, es false.

Ejemplos

En el ejemplo de código siguiente se controla el Click evento en HtmlDocument. Si un elemento no se seleccionó anteriormente mediante un clic del mouse, el código asigna el elemento a una variable de clase privada denominada MoveElement. Si se seleccionó un elemento, el código intenta anexarlo al elemento en el que se acaba de hacer clic. Este ejemplo de código requiere que la aplicación hospede un WebBrowser control denominado WebBrowser1y que ya haya agregado un controlador de eventos para el Click evento en HtmlDocument.

HtmlDocument doc;
HtmlElement moveElement;

private void EnableElementMove()
{
    if (webBrowser1 != null)
    {
        doc = webBrowser1.Document;
        doc.Click += new HtmlElementEventHandler(doc_Click);
    }
}

void doc_Click(object sender, HtmlElementEventArgs e)
{
    if (moveElement == null)
    {
        moveElement = webBrowser1.Document.GetElementFromPoint(e.ClientMousePosition);
    }
    else
    {
        HtmlElement targetElement = webBrowser1.Document.GetElementFromPoint(e.ClientMousePosition);
        if (targetElement.CanHaveChildren)
        {
            targetElement.AppendChild(moveElement);
            moveElement = null;
        }
    }
}

Dim WithEvents Doc As HtmlDocument
Dim MoveElement As HtmlElement

Private Sub EnableElementMove()
    If (WebBrowser1 IsNot Nothing) Then
        Doc = WebBrowser1.Document
    End If
End Sub

Private Sub Document_Click(ByVal sender As Object, ByVal args As HtmlElementEventArgs) Handles Doc.Click
    If (MoveElement Is Nothing) Then
        MoveElement = WebBrowser1.Document.GetElementFromPoint(args.ClientMousePosition)
    Else
        With WebBrowser1.Document
            Dim TargetElement As HtmlElement = .GetElementFromPoint(args.ClientMousePosition)
            If (TargetElement.CanHaveChildren) Then

                TargetElement.AppendChild(MoveElement)
                MoveElement = Nothing
            End If
        End With
    End If
End Sub

Comentarios

Algunos elementos, como IMG y SCRIPT, no pueden tener elementos secundarios. Use esta propiedad antes de llamar AppendChild a o InsertAdjacentElement en un elemento arbitrario.