关于使用IHtmlDocument2的问题

[hyan]

在bcb中使用IHtmlDocument2接口，定义的h头文件是什么啊？

我在delphi中写的函数如何在bcb中实现，源码如下：
var
Doc: IHtmlDocument2;
Body: IHtmlElement;
pf: TextFile;
begin
if SaveDialog1.Execute then begin
try
Doc := web.Document as IHtmlDocument2;
if Doc = nil then Exit;
Body := Doc.body;
if Body = nil then Exit;
AssignFile(pf,SaveDialog1.FileName);
Rewrite(pf);
Writeln(pf, String(Body.innerHTML));
CloseFile(pf);
except
end;
end;
end;

[pp616]

IHTMLDocument2 *pDoc=NULL;
IHTMLElement *pBody=NULL;
BSTR bstr;
(void *)pDoc=CppWebBrowser1->Document;
pDoc->get_body(&pBody);
if(!pBody) return ;
pBody->get_innerHTML(&bstr);
TStringList *pstrs=new TStringList;
pstrs->Text=bstr;
pstrs->SaveToFile(SaveDialog1->FileName);
delete pstrs;
pBody->Release();

[hyan]

问题找到了，是大小写错误。
还是非常感谢 pp616(傻小子) 的回复！