Доброго времени суток !!!
Возникла необходимость в своем браузере. В качестве исходника взял 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"]