//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
   : TForm(Owner)
{
   CppWebBrowser1->Navigate(WideString("http://www.daum.net"), 0, 0, 0, 0);
}
//---------------------------------------------------------------------------



void __fastcall TForm1::SetHTMLSource(AnsiString sHTML, TCppWebBrowser *wb)
{
  TMemoryStream* stm = new TMemoryStream;
  IPersistStreamInit* psi;
  TStreamAdapter* sa;

  stm->SetSize(sHTML.Length());
  stm->Seek(0,0);
  stm->Write(sHTML.c_str(), sHTML.Length());
  stm->Seek(0,0);

  sa = new TStreamAdapter (stm, soReference);

  if (SUCCEEDED(wb->Document->QueryInterface(IID_IPersistStreamInit, (void**)&psi)))
  {
      psi->Load((IStream*) sa);
      psi->Release ();
  }
}
void __fastcall TForm1::Button1Click(TObject *Sender)
{
   SetHTMLSource( "

asdfadf"",
               CppWebBrowser1 );
}
//---------------------------------------------------------------------------



멀더님.. 죄송하지만.. 한번더 부탁 드립니다.
위와 같이 간단히 테스트 해보려고 했는데
QueryInterface에서 memory access 관련 에러가 뜨네요.
도저히 감이 안잡힙니다. ㅠ.ㅠ) 바쁘신데 부탁 드립니다. (--)(__)