Запишете уеб страница като HTML или MHT с помощта на Delphi

Когато работите с Delphi, the TWebBrowser компонент ви позволява да създадете персонализиран Приложение за уеб сърфиране или да добавите интернет, файлове и мрежово сърфиране, преглед на документи и възможности за изтегляне на данни към вашите приложения.

Как да запазите уеб страница от TWebBrowser

Когато използвате Internet Explorer, имате право да преглеждате изходния HTML код на дадена страница и да я запишете като файл на вашия локален диск. Ако разглеждате страница, която искате да запазите, отидете на Файл / Запазване като... елемент от менюто. В диалоговия прозорец, който се отваря, имате предлагани няколко типа файлове. Записването на страницата като различен тип файлове ще се отрази на начина, по който е запазена.

Компонентът TWebBrowser (намира се на страницата "Интернет" на палитрата на компонентите) осигурява достъп до функционалността на уеб браузъра от вашия Приложения Delphi. Като цяло ще искате да активирате записването на уеб страница, показвана вътре в WebBrowser като HTML файл на диск.

instagram viewer

Запазване на уеб страница като необработен HTML

Ако искате само да запазите уеб страница като необработен HTML, ще изберете „Уеб страница, само HTML (* .htm, * .html)“. Той просто ще запази първоначалния HTML на текущата страница на вашия диск непокътнат. Това действие НЯМА да запише графиките от страницата или други файлове, използвани в нея, което означава, че ако сте заредили файла обратно от локалния диск, ще видите прекъснати връзки към изображения.

Ето как да запазите уеб страница като суров HTML с помощта на кода на Delphi:

Проба за използване:

бележки

  • Интерфейсите IPersistStreamInit и IStream се декларират в ActiveX модула.
  • Уеб страницата се записва като суров HTML във файла WebBrowser1.html в основната папка на C устройството.

MHT: Уеб архив, един файл

Когато запазите уеб страница като "Уеб архив, един файл (* .mht)", уеб документът се запазва във формат HTML за многофункционално разширение на Интернет поща (MHTML) с разширение на файла .mht. Всички относителни връзки в уеб страницата са пренаредени и вграденото съдържание е включено във .mht файла, вместо да бъдат запазени в отделна папка (както е в случая с „Уеб страница, завършена (* .htm, * .Html) ").

MHTML ви позволява да изпращате и получавате уеб страници и други HTML документи, използвайки програми за електронна поща, като Microsoft Outlook и Microsoft Outlook Express; или дори вашите персонализирани решения за изпращане на имейл от Delphi. MHTML ви позволява да вграждате изображения директно в тялото на вашите имейл съобщения, а не да ги прикачвате към съобщението.

Ето как да запазите уеб страница като един файл (MHT формат) с помощта на Delphi код:

Използване на проба:

Забележка

  • Класът _Stream е дефиниран в ADODB_TLB единица, която вероятно вече сте създали. Кодът на интерфейсите за IMessage и IConfiguration от cdosys.dll библиотека. CDO означава Обекти на данни за колаборация - обектни библиотеки, проектирани да позволяват SMTP съобщения.

CDO_TLB е автоматично генерирано устройство от Delphi. За да го създадете, от главното меню изберете "Импортиране на тип библиотека", изберете "C: \ WINDOWS \ system32 \ cdosys.dll", след което натиснете бутона "Създаване на единица".

Няма TWebBrowser

Можете да пренапишете процедурата WB_SaveAs_MHT, за да приемете URL низ (не TWebBrowser), за да можете да запишете уеб страница директно - няма нужда да използвате компонента WebBrowser. URL адресът от WebBrowser се извлича с помощта на свойството WB.LocationURL.