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

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

Как сохранить страницу в WebBrowser полностью? [D6, D7, Win95/98, WinXP]

oleg_SYS ©   (2005-05-14 00:47:00) 

Необходимо сохранить на диск страницу вместе с картинками, скриптами и т.д. (как это делает IE через File=>Save As..).
Но нужно это сделать без диалога на запрос сохранения.

Пробовал такой код, но диалог всё-равно появлялся:


procedure TForm1.Button1Click(Sender: TObject);
var
ov1, ov2: OleVariant;
begin
ov1 := 'C:\page.htm';
WebBrowser1.ControlInterface.ExecWB(OLECMDID_SAVEAS, OLECMDEXECOPT_DONTPROMPTUSER, ov1, ov2);
end;


---

oleg_SYS   (2005-05-14 18:35:00) [1]

окно не появляется но и не создаётся страница :(

---

MadAngel   (2005-05-14 14:16:00) [2]

Ответа не знаю, но подозреваю, что копать надо в эту сторону.. ;)
WebBrowser1.ControlInterface.ExecWB( OLECMDID_SAVE, OLECMDEXECOPT_DONTPROMPTUSER, ov1, ov2);

---

Наверх