13,825
社区成员
发帖
与我相关
我的任务
分享
void __fastcall TForm1::FormCreate(TObject *Sender)
{
CppWebBrowser1->Navigate(L"http://www.cipg.org.cn");
}
//---------------------------------------------------------------------------
void __fastcall TForm1::CppWebBrowser1NewWindow2(TObject *Sender,
LPDISPATCH *ppDisp, VARIANT_BOOL *Cancel)
{
if(flag)
{
CppWebBrowser1->Hide();
CppWebBrowser2->Show();
*ppDisp=CppWebBrowser2-> ControlInterface;
*Cancel=false;
flag=false;
}
}
//---------------------------------------------------------------------------
void __fastcall TForm1::CppWebBrowser2NewWindow2(TObject *Sender,
LPDISPATCH *ppDisp, VARIANT_BOOL *Cancel)
{
if(!flag)
{
CppWebBrowser2->Hide();
CppWebBrowser1->Show();
*ppDisp=CppWebBrowser1-> ControlInterface;
*Cancel=false;
flag=true;
}
}