Как в TWEBBrowser организовать изменение размера шрифта

procedure
 TWebBrowserXXX.SetFontSize(nSize: OleVariant);
begin

  if
 (nSize >= 0) and
 (nSize <= 4) then

    ExecWB(OLECMDID_ZOOM, OLECMDEXECOPT_DONTPROMPTUSER, nSize)
end
;

Другое по теме:

• Очистка кэша в IE
• WEB страничка внутри Delphi приложения
• Автоматическое заполнение HTML-форм в браузере