Επεξεργασία

Κοινή χρήση μέσω


HtmlElement.CanHaveChildren Property

Definition

Gets a value indicating whether this element can have child elements.

public:
 property bool CanHaveChildren { bool get(); };
public bool CanHaveChildren { get; }
member this.CanHaveChildren : bool
Public ReadOnly Property CanHaveChildren As Boolean

Property Value

true if element can have child elements; otherwise, false.

Examples

The following code example handles the Click event on HtmlDocument. If an element was not previous selected using a mouse click, the code assigns the element to a private class variable named MoveElement. If an element was selected, the code attempts to append it to the element that was just clicked. This code example requires that your application hosts a WebBrowser control named WebBrowser1, and that you have already added an event handler for the Click event on 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

Remarks

Some elements, such as IMG and SCRIPT, cannot have any children. Use this property before you call AppendChild or InsertAdjacentElement on an arbitrary element.

Applies to