[teandr]

Доброго времени суток !!!

Возникла необходимость в своем браузере. В качестве исходника взял Mini-webbrowser (прилагается).Отредактировал его для собственных нужд.
Всё устраивает,но есть один ,в моем случае,очень большой недостаток. Дело в том, что браузер не поддерживает изменение размера шрифта.Это нужно для чата ,работающего на flash. Так-вот, в этом чате
есть возможность менять FRONT SIZE.

В моём случае, при нажатии на стрелочки,размер не изменяется и перестаёт работать Back Space в окне чата.
На форумах нашел возможное решение проблемы:

Код:

procedure TWebBrowserXXX.SetFontSize(nSize: OleVariant);
begin
  if (nSize >= 0) and (nSize <= 4) then
    ExecWB(OLECMDID_ZOOM, OLECMDEXECOPT_DONTPROMPTUSER, nSize)
end;

Но куда вставить этот код ?(программирую на PHP,с Delphi мало знаком).
Помогите пожалуйста !!!!!!! Очень нужно.

[url="http://delphiexpert.ru/load/source/mini_webbrowser.zip"]