(Delphi DLL) Save Web Page to MHT String
Downloads a web page into a string variable containing MHT. MHT is a web archive with all images and style sheets embedded. It's a MIME-formatted text document. When saved with the .mht extension, Internet Explorer can open and display the page.
uses
Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls, Mht;
...
procedure TForm1.Button1Click(Sender: TObject);
var
mht: HCkMht;
mhtStr: PWideChar;
begin
// This example assumes the Chilkat API to have been previously unlocked.
// See Global Unlock Sample for sample code.
mht := CkMht_Create();
mhtStr := CkMht__getMHT(mht,'http://www.google.com/');
if (CkMht_getLastMethodSuccess(mht) <> True) then
begin
Memo1.Lines.Add(CkMht__lastErrorText(mht));
end
else
begin
Memo1.Lines.Add(mhtStr);
end;
CkMht_Dispose(mht);
end;
|