点击“help”后打开一个HTML文件，怎么实现？(20分)

[blue]我遇到这样一个问题，就是我想让一个用HTML作的HELP在DELPHI菜单中的“帮助”点击
后就自动打开，听说用OLE可以，不过不知道怎么实现，希望高手指点。当然，最好能告诉我一
个可以打开任何一种文件的方法。[/blue]

不用ole，只要加上application.helpfile:='adf.hlp';

uses shellapi;
ShellExecute(
HWND hwnd, // handle to parent window
LPCTSTR lpOperation, // pointer to string that specifies operation to perform
LPCTSTR lpFile, // pointer to filename or folder name string
LPCTSTR lpParameters, // pointer to string that specifies executable-file parameters
LPCTSTR lpDirectory, // pointer to string that specifies default directory
INT nShowCmd )
例:ShellExecute(handle, nil, pchar('http://www.sina.com.cn'), Nil, Nil, SW_SHOWNORMAL);

接受答案了.