| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Как изменить размер шрифта в TWebBrouser  ? [D5, Win2k]

lds ©   (2002-06-21 13:29:00) 

Как изменить размер шрифта в TWebBrouser ?

---

int64   (2002-06-21 15:12:00) [1]

procedure TForm1.Button1Click(Sender: TObject);
var
vaIn, vaOut: Olevariant;
begin
vaIn:= 4; //значение от 0 до 4
if WebBrowser1.Document <> nil then
(WebBrowser1.Document as IOleCommandTarget).Exec(
PGUID(nil),
OLECMDID_ZOOM,
OLECMDEXECOPT_DONTPROMPTUSER,
vaIn,
vaOut);
end;

---

Наверх