Entw.: IE-Programmierung (3)

Editieren von HTML-Dokumenten mit IE

Mit der TWebBrowser-Komponente von Delphi sind HTML-Texte direkt änderbar. Die TWebBrowser-Komponente verwendet das ActiveX-Control des Internet Exploxer's. Zum Editieren von HTML-Mail's und deren Vorlagen wurde ein HTML-kontextsensitiver Texteditor und ein WYSIWYG-Editor implementiert.

WYSIWYG-EditorWYSIWYG-Editor

Mit dem WYSIWYG-Editor können die HTML-Mail's einfach und schnell den Erfordernissen angepasst werden. Dazu sind vom Anwender keinerlei HTML-Kenntnisse nötig.


HTML-EditorHTML-Editor

Für den Anwender mit guten HTML-Kenntnissen kann auch direkt HTML-Text eingegeben bzw. verändert werden. Dazu wird ein kontextsensitiver Texteditor zur Verfügung gestellt.


Editiermodus ein-/ausschalten

Die TWebBrowser-Komponente wird folgendermassen in den Editiermodus geschaltet:
(aWebBrowser.Document as IHTMLDocument2).DesignMode := 'On';

Das Verlassen des Editiermodus geschieht durch :
(aWebBrowser.Document as IHTMLDocument2).DesignMode := 'Off';

API

Nachfolgend sind einige Änderungsfunktionen der API aufgelistet. Das Manipulationobjekt ist vom Typ IHTMLDocument2.
    aIHTMLDocument2 := aWebBrowser.Document as IHTMLDocument2;

  • →Aufzählungsabsätze mit Punkte:
        aIHTMLDocument2.execCommand(DoExecuteCommand('insertunorderedlist', False, 0);
  • →Aufzählungsabsätze mit Nummern:
        aIHTMLDocument2.execCommand('insertorderedlist', False, 0);
  • →Selektierten Text kopieren:
        aIHTMLDocument2.execCommand('Copy', True, 0);
  • →Selektierten Text ausschneiden:
        aIHTMLDocument2.execCommand('Cut', True, 0);
  • →Text einfügen:
        aIHTMLDocument2.execCommand('Paste', True, 0);
  • →Undo der vorherigen Aktion:
        aIHTMLDocument2.execCommand('Undo', False, 0);
  • →Selektierten Text in Bold wandeln oder Bold zurücknehmen:
      aIHTMLDocument2.execCommand('Bold', False, not aIsBold);
  • →Selektierten Text in Italic wandeln oder Italic zurücknehmen:
        aIHTMLDocument2.execCommand('Italic', False, not aIsItalic);
  • →Selektierten Text unterstreichen oder das Unterstreichen zurücknehmen:
        aIHTMLDocument2.execCommand('Underline', False, not aIsUnderline);
  • →Selektierten Text eine Vordergrundfarbe zuweisen:
        aIHTMLDocument2.execCommand('ForeColor', False, aColor);
  • →Selektierten Text eine Hintergrundfarbe zuweisen:
        aIHTMLDocument2.execCommand('BackColor', False, aColor);
  • →Absatz linksbündig:
        aIHTMLDocument2.execCommand('JustifyLeft', False, 0);
  • →Absatz zentrieren:
        aIHTMLDocument2.execCommand('JustifyCenter', False, 0);
  • →Absatz rechtsbündig:
        aIHTMLDocument2.execCommand('JustifyRight', False, 0);