Gewusst wie: Ändern von Formaten eines Elements im verwalteten HTML-Dokumentobjektmodell
Aktualisiert: November 2007
Sie können mit Formaten in HTML die Darstellung eines Dokuments und seiner Elemente steuern. HtmlDocument und HtmlElement unterstützen Style-Eigenschaften, die Formatzeichenfolgen im folgenden Format verwenden:
name1:value1;...;nameN:valueN;
Dies ist ein DIV mit einer Formatzeichenfolge, die die Schriftart auf Arial und den Text auf Fett festlegt:
<DIV style="font-face:arial;font-weight:bold;">
Hello, world!
</DIV>
Das Problem beim Bearbeiten von Formaten mithilfe der Style-Eigenschaft liegt darin, dass es umständlich sein kann, einzelne Formateinstellungen zur Zeichenfolge hinzuzufügen bzw. daraus zu entfernen. Wenn beispielsweise der voranstehende Text kursiv angezeigt werden sollte, solange der Benutzer den Cursor über dem DIV positioniert, und normal, wenn er den Cursor vom DIV entfernt, würde dies zu einer komplexen Prozedur führen. Es kann sehr zeitaufwändig sein, eine große Anzahl von Formaten auf diese Weise zu bearbeiten.
Die folgende Prozedur enthält Code, mit dem Sie Formate in HTML-Dokumenten und -Elementen leicht bearbeiten können. Für diese Prozedur wird vorausgesetzt, dass Sie grundlegende Aufgaben in Windows Forms ausführen können, z. B. das Erstellen eines neuen Projekts oder das Hinzufügen eines Steuerelements zu einem Formular.
So verarbeiten Sie Formatänderungen in einer Windows Forms-Anwendung
Erstellen Sie ein neues Windows Forms-Projekt.
Erstellen Sie eine neue Klassendatei, deren Erweiterung für Ihre Programmiersprache geeignet ist.
Kopieren Sie den StyleGenerator-Klassencode im Beispielabschnitt dieses Themas in die Klassendatei, und speichern Sie den Code.
Speichern Sie den folgenden HTML-Code in einer Datei mit dem Namen Test.htm.
<HTML> <BODY> <DIV style="font-face:arial;font-weight:bold;"> Hello, world! </DIV><P> <DIV> Hello again, world! </DIV><P> </BODY> </HTML>
Fügen Sie ein WebBrowser-Steuerelement mit dem Namen webBrowser1 zum Hauptformular des Projekts hinzu.
Fügen Sie der Codedatei des Projekts folgenden Code hinzu.
Wichtiger Hinweis: Stellen Sie sicher, dass der webBrowser1_DocumentCompleted-Ereignishandler als Listener für das DocumentCompleted-Ereignis konfiguriert ist. Doppelklicken Sie in Visual Studio auf das WebBrowser-Steuerelement. In einem Text-Editor konfigurieren Sie den Listener programmgesteuert.
<System.Security.Permissions.PermissionSet(Security.Permissions.SecurityAction.Demand, Name:="FullTrust")> _ Public Class Form1 Dim SG As StyleGenerator = Nothing Dim Elem As HtmlElement = Nothing Dim WithEvents DocumentEvents As HtmlDocument Private Sub WebBrowser1_DocumentCompleted(ByVal sender As System.Object, ByVal e As System.Windows.Forms.WebBrowserDocumentCompletedEventArgs) Handles WebBrowser1.DocumentCompleted SG = New StyleGenerator() DocumentEvents = WebBrowser1.Document End Sub Private Sub Document_MouseOver(ByVal sender As Object, ByVal e As HtmlElementEventArgs) Handles DocumentEvents.MouseOver Elem = WebBrowser1.Document.GetElementFromPoint(e.MousePosition) If Elem.TagName.Equals("DIV") Then SG.ParseStyleString(Elem.Style) SG.SetStyle("font-style", "italic") Elem.Style = SG.GetStyleString() End If End Sub Private Sub Document_MouseLeave(ByVal sender As Object, ByVal e As HtmlElementEventArgs) Handles DocumentEvents.MouseLeave If (Elem IsNot Nothing) Then SG.RemoveStyle("font-style") Elem.Style = SG.GetStyleString() ' Reset, since we may mouse over a new DIV element next time. SG.Clear() End If End Sub End Class
StyleGenerator sg = null; HtmlElement elem = null; private void webBrowser1_DocumentCompleted(object sender, WebBrowserDocumentCompletedEventArgs e) { sg = new StyleGenerator(); webBrowser1.Document.MouseOver += new HtmlElementEventHandler(Document_MouseOver); webBrowser1.Document.MouseLeave += new HtmlElementEventHandler(Document_MouseLeave); } void Document_MouseOver(object sender, HtmlElementEventArgs e) { elem = webBrowser1.Document.GetElementFromPoint(e.MousePosition); if (elem.TagName.Equals("DIV")) { sg.ParseStyleString(elem.Style); sg.SetStyle("font-style", "italic"); elem.Style = sg.GetStyleString(); } } void Document_MouseLeave(object sender, HtmlElementEventArgs e) { if (elem != null) { sg.RemoveStyle("font-style"); elem.Style = sg.GetStyleString(); // Reset, since we may mouse over a new DIV element next time. sg.Clear(); } }
Führen Sie das Projekt aus. Bewegen Sie den Cursor über dem ersten DIV, um die Auswirkungen des Codes zu überprüfen.
Beispiel
Im folgenden Codebeispiel wird der vollständige Code für die StyleGenerator-Klasse gezeigt, die einen vorhandenen Formatwert analysiert, das Hinzufügen, Ändern und Entfernen von Formaten unterstützt und einen neuen Formatwert mit den gewünschten Änderungen zurückgibt.
Imports System
Imports System.Collections.Generic
Imports System.Text
Public Class StyleGenerator
Dim styleDB As Dictionary(Of String, String)
Public Sub New()
styleDB = New Dictionary(Of String, String)()
End Sub
Public Function ContainsStyle(ByVal name As String) As Boolean
Return styleDB.ContainsKey(name)
End Function
Public Function SetStyle(ByVal name As String, ByVal value As String) As String
Dim oldValue As String = ""
If (Not name.Length > 0) Then
Throw New ArgumentException("Parameter name cannot be zero-length.")
End If
If (Not value.Length > 0) Then
Throw New ArgumentException("Parameter value cannot be zero-length.")
End If
If (styleDB.ContainsKey(name)) Then
oldValue = styleDB(name)
End If
styleDB(name) = value
Return oldValue
End Function
Public Function GetStyle(ByVal name As String) As String
If (Not name.Length > 0) Then
Throw New ArgumentException("Parameter name cannot be zero-length.")
End If
If (styleDB.ContainsKey(name)) Then
Return styleDB(name)
Else
Return ""
End If
End Function
Public Sub RemoveStyle(ByVal name As String)
If (styleDB.ContainsKey(name)) Then
styleDB.Remove(name)
End If
End Sub
Public Function GetStyleString() As String
If (styleDB.Count > 0) Then
Dim styleString As New StringBuilder("")
Dim key As String
For Each key In styleDB.Keys
styleString.Append(String.Format("{0}:{1};", CType(key, Object), CType(styleDB(key), Object)))
Next key
Return styleString.ToString()
Else
Return ""
End If
End Function
Public Sub ParseStyleString(ByVal styles As String)
If (styles.Length) > 0 Then
Dim stylePairs As String() = styles.Split(New Char() {";"c})
Dim stylePair As String
For Each stylePair In stylePairs
If (stylePairs.Length > 0) Then
Dim styleNameValue As String() = stylePair.Split(New Char() {":"c})
If (styleNameValue.Length = 2) Then
styleDB(styleNameValue(0)) = styleNameValue(1)
End If
End If
Next stylePair
End If
End Sub
Public Sub Clear()
styleDB.Clear()
End Sub
End Class
using System;
using System.Collections.Generic;
using System.Text;
namespace ManagedDOMStyles
{
public class StyleGenerator
{
private Dictionary<string, string> styleDB;
public StyleGenerator()
{
styleDB = new Dictionary<string, string>();
}
public bool ContainsStyle(string name)
{
return(styleDB.ContainsKey(name));
}
public string SetStyle(string name, string value)
{
string oldValue = "";
if (!(name.Length > 0))
{
throw (new ArgumentException("Parameter name cannot be zero-length."));
}
if (!(value.Length > 0))
{
throw (new ArgumentException("Parameter value cannot be zero-length."));
}
if (styleDB.ContainsKey(name))
{
oldValue = styleDB[name];
}
styleDB[name] = value;
return (oldValue);
}
public string GetStyle(string name)
{
if (!(name.Length > 0))
{
throw (new ArgumentException("Parameter name cannot be zero-length."));
}
if (styleDB.ContainsKey(name))
{
return (styleDB[name]);
}
else
{
return ("");
}
}
public void RemoveStyle(string name)
{
if (styleDB.ContainsKey(name))
{
styleDB.Remove(name);
}
}
public string GetStyleString()
{
if (styleDB.Count > 0)
{
StringBuilder styleString = new StringBuilder("");
foreach (string key in styleDB.Keys)
{
styleString.Append(String.Format("{0}:{1};", (object)key, (object)styleDB[key]));
}
return (styleString.ToString());
}
else
{
return ("");
}
}
public void ParseStyleString(string styles)
{
if (styles.Length > 0)
{
string[] stylePairs = styles.Split(new char[] { ';' });
foreach(string stylePair in stylePairs)
{
if (stylePairs.Length > 0)
{
string[] styleNameValue = stylePair.Split(new char[] { ':' });
if (styleNameValue.Length == 2)
{
styleDB[styleNameValue[0]] = styleNameValue[1];
}
}
}
}
}
public void Clear()
{
styleDB.Clear();
}
}
}