HtmlHelp API

[Tuan3249]

I'm having trouble calling this function. I've got the declaration as follows:

Const HH_DISPLAY_TOPIC = &H0
Const HH_HELP_CONTEXT = &HF


Private Declare Function HtmlHelp Lib "HHCtrl.ocx" Alias "HtmlHelpA" _
   (ByVal hwndCaller As Long, _
   ByVal pszFile As String, _
   ByVal uCommand As Long, _
   dwData As Any) As Long

And I'm calling it as:

    strPath = RegistryAccess("HKEY_LOCAL_MACHINE\Software\ML\MySoft\App Path",1, "", "")
    
strPath = IIf(Right(strPath, 1) = "\", strPath & "MyHelp.chm", strPath & "\MyHelp.chm")
    
    Call HtmlHelp(Me.hWnd, strPath, HH_HELP_CONTEXT, 165000)

However, nothing happens after this. Theres no error and no message is displayed. It just does nothing at all. Any ideas?