＋设为首页 ＋添加到收藏夹
不要让他弹出保存窗口,程序自动保存!!
URLDownloadToFile
#include <mshtml.h>
void __fastcall TForm1::Button3Click(TObject *Sender)
{
IPersistStreamInit *ps;
TMemoryStream *ss ;
bool Result;
CppWebBrowser1->Navigate(WideString("www.google.com").c_bstr());
CppWebBrowser1->SetFocus();
while(!CppWebBrowser1->Document)Application->ProcessMessages();
Sleep(1000);
CppWebBrowser1->Document->QueryInterface(
IID_IPersistStreamInit,
(void **)&ps
);
ss = new TMemoryStream();
try
{
TStreamAdapter *sm=new TStreamAdapter(ss, soReference);
Result = SUCCEEDED(ps->Save( *sm, true));
if (Result)
{
ss->Position=0;
Memo1->Lines->LoadFromStream(ss);
}
}
__finally
{
ss->Free();
}
}
你什么意思？
１：页面里的一个Txt文件连接？
２：页面里的纯文本内容？
