画面編集機能

フォントの変更等もIEコンポーネントの機能を呼び出すだけで実現できます。

機能	Execの引数
フォント設定	IDM_FONT
太字	IDM_BOLD
斜体	IDM_ITALIC
下線	IDM_UNDERLINE
取消線	IDM_STRIKETHROUGH
背景色	IDM_BACKCOLOR
画像	IDM_IMAGE
下付き	IDM_SUBSCRIPT
上付き	IDM_SUPERSCRIPT

ソースのイメージはこんな感じ。

var
  ComTarget: IOleCommandTarget;
  pIn, pOut: OleVariant;
begin
  ComTarget := WebBrowser1.Document As IOleCommandTarget;
  if ComTarget <> Nil then begin
    pIn := NULL;
    pOut := NULL;
    ComTarget.Exec(@CMDSETID_Forms3, IDM_FONT, 0, pIn, pOut);
  end;
end;