Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Сети";
Текущий архив: 2004.12.12;
Скачать: [xml.tar.bz2];

Вниз

Можно с помощью TWebBrowser сохранить текущую страницу в MHT?   Найти похожие ветки 

 
N.H.   (2004-10-03 03:52) [0]

Здравствуйте. Подскажите, можно ли с помощью компонента TWebBrowser (или какой-нибудь его альтернативы) сохранить текущую страницу в формате MHTML?

Задача:
Пользователь задаёт веб-браузеру адрес страницы. Браузер открывает эту страницу, а потом, когда она полностью загрузится, ему надо будет сохранить эту страницу в формате MHTML.

Если это невозможно, подскажите, альтернативные пути решения задачи. Большое спасибо.


 
Piter ©   (2004-10-03 11:31) [1]

Ну с загрузкой думаю проблем-то никаких... надо просто сделать Navigate2 браузеру на нужную страницу.
Насчет сохранения странички:

var
vaIn, vaOut: Olevariant;
CmdTarget: IOleCommandTarget;
begin
if WebBrowser1.Document <> nil then
try
  WebBrowser1.Document.QueryInterface(IOleCommandTarget, CmdTarget);
  if CmdTarget <> nil then
  try
    CmdTarget.Exec(PGUID(nil), OLECMDID_SAVEAS, OLECMDEXECOPT_DODEFAULT, vaIn, vaOut);
  finally
    CmdTarget._Release;
  end;
except end;


при этом все равно будет выведено окно сохранения, где пользователь должен выбрать имя файла, тип сохранения...
Можно задать файо по умолчанию определив vaIn - но без окошка все равно не обойтись, имхо... не может так WB сделать...

P.S. Была тема - http://delphimaster.net/view/6-1087974793/ - не знаю доступна ли она сейчас...


 
Piter ©   (2004-10-03 11:32) [2]

Тем уже удалена - вот ее архив:

http://piter007.newmail.ru/archive/SpecamPoTWebBrowser.html


 
N.H.   (2004-10-05 00:07) [3]


> Piter ©   (03.10.04 11:32) [2]

Да, спасибо, я почитал статью (http://delphi.about.com/library/weekly/aa062904a.htm) Теперь страница у меня сохраняется в MHT,но без картинок :( Хотя я все делаю правильно.



Страницы: 1 вся ветка

Форум: "Сети";
Текущий архив: 2004.12.12;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.46 MB
Время: 0.039 c
4-1099076434
Redhopter
2004-10-29 23:00
2004.12.12
О перехвате сообщений


1-1101297114
col-isaev
2004-11-24 14:51
2004.12.12
параметры функций в ДЛЛ


1-1101817959
div
2004-11-30 15:32
2004.12.12
Delphi2005


1-1101777731
Змей
2004-11-30 04:22
2004.12.12
две формы в активе


3-1100089389
Term
2004-11-10 15:23
2004.12.12
QReport как сделать в отчёте промежуточные итоги





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский