HtmlElement.DomElement Свойство

Определение

Пространство имен:

System.Windows.Forms

Сборка:

System.Windows.Forms.dll

Возвращает указатель на неуправляемый интерфейс для этого элемента.

public:
 property System::Object ^ DomElement { System::Object ^ get(); };

public object DomElement { get; }

member this.DomElement : obj

Public ReadOnly Property DomElement As Object

Значение свойства

Object

Указатель IUnknown модели COM для элемента, который можно привести к одному из интерфейсов элемента HTML, такому как IHTMLElement.

Примеры

В следующем примере кода используются неуправляемые интерфейсы для получения выделенного текста и преобразования его в гиперссылку с URL-адресом, выбранным пользователем. Этот код был написан с предположением, что форма имеет WebBrowser элемент управления с именем WebBrowser1и что вы добавили неуправляемую библиотеку MSHTML в качестве ссылки на проект.

private void CreateHyperlinkFromSelection()
{
    if (webBrowser1.Document != null)
    {

        MSHTML.IHTMLDocument2 iDoc = (MSHTML.IHTMLDocument2)webBrowser1.Document.DomDocument;

        if (iDoc != null)
        {
            MSHTML.IHTMLSelectionObject iSelect = iDoc.selection;
            if (iSelect == null)
            {
                MessageBox.Show("Please select some text before using this command.");
                return;
            }

            MSHTML.IHTMLTxtRange txtRange = (MSHTML.IHTMLTxtRange)iSelect.createRange();

            // Create the link.
            if (txtRange.queryCommandEnabled("CreateLink"))
            {
                Object o = null;
                txtRange.execCommand("CreateLink", true, o);
            }
        }
    }
}

Private Sub CreateHyperlinkFromSelection()
    If (WebBrowser1.Document IsNot Nothing) Then
        Dim IDoc As mshtml.IHTMLDocument2 = WebBrowser1.Document.DomDocument

        If (Not (IDoc Is Nothing)) Then
            Dim ISelect As mshtml.IHTMLSelectionObject = IDoc.selection
            If (ISelect Is Nothing) Then
                MsgBox("Please select some text before using this command.")
                Exit Sub
            End If

            Dim TxtRange As mshtml.IHTMLTxtRange = ISelect.createRange()

            ' Create the link.
            If (TxtRange.queryCommandEnabled("CreateLink")) Then
                TxtRange.execCommand("CreateLink", True)
            End If
        End If
    End If
End Sub

Комментарии

HtmlElement — это оболочка для модели DOM в Internet Explorer, которая написана с помощью модели COM. Если вам нужно получить доступ к неэкспонированным свойствам или методам в базовых COM-интерфейсах, таких как IHTMLElement, этот объект можно использовать для их запроса.

Чтобы использовать неуправляемые интерфейсы, необходимо импортировать библиотеку MSHTML (mshtml.dll) в приложение. Однако с помощью Invoke метода можно также выполнять необнаруженные свойства и методы.

См. также раздел

• DomDocument
• Интерфейс IHTMLElement2