如何显示CHM文件？(50分)

我想在程序中显示CHM文件，但不用MS的HH.exe，不知道能不能实现？
我的意思不是制作联机帮助系统，最好是有类似TWebBrowser那样的控件，可以在里面直接显示CHM的内容，而且能对CHM直接进行操作

// 个人描述,可能有不正确的地方
HRESULT hr;

// get thedo
cument dispatch from browser
IDispatch *pDisp = GetHtmlDocument();
// 定义一个*pDisp变量，执行GETHTMLDOCUMENT，返回值保存在PDISIP
ASSERT( pDisp );
//if NULL, we failed // DELPHI也有断言函数
IHTMLDocument2 *pDocument = NULL;
// 同上
ASSERT( pDocument );
pDisp->Release();
// 调用成员函数

----------------
var
hr: Hresult;
pdisp: ^Idispatch;
pDocument: ^IHTMLDocument2;
begin

pdisp := getHtmlDocument();
assert(pdisp <> nill);
pDocument := nil;
Pdisp.Release();
end;

接受答案了.