Calling a .chm file **SOLVED**

[Sgt-Peppa]

Hey guys, i have a small prob here!

I am trying to call a .chm file throug the API. I do not get any Error Messages but my helpfile just aint showing, Does anyone see my mistake here?

Public Helpfile As String
Private Const HH_Display_Topic = &H0
Private Declare Function HtmlHelp Lib "hhctrl.ocx" Alias "HtmlHelpA" _
(ByVal hwndCaller As Long, ByVal pszFile As String, ByVal uCommand As Long, ByVal dwData As Long) As Long
 
 
Private Sub Form_Load()
Helpfile = "Hilfe.chm"
End Sub
 
Private Sub mnu_hilfe_Click()
Call HtmlHelp(0, Helpfile, HH_Display_Topic, ByVal 0&)
End Sub

Thanx for your help in advance,


Stephan

[blaff]

Put the Helpfile in the same folder as your project and try:

Private Sub Form_Load()
    Helpfile = App.Path & "\" & "Hilfe.chm"
End Sub
 
Private Sub mnu_hilfe_Click()
    Call HtmlHelp(Me.hwnd, Helpfile, HH_Display_Topic, ByVal 0&)
End Sub

[Sgt-Peppa]

Oh boy do I feel stupid now! That was exactly it! Thanx a lot for helping me on that one! Boy, do I hate creating these Help files!


Thanx again,


Stephan

[McGenius]

You don't even need an API to open help:

Private Sub Form_Load()
    Helpfile = App.Path & "\" & "Hilfe.chm"
End Sub
 
Private Sub mnu_hilfe_Click()
    SendKeys "{F1}" 'this will open start page
End Sub

[Sgt-Peppa]

You are absolutely right, but I think I have some problems with my help file, everytime I try to open it throug F1, i get a weird message bout my MAP section saying HH_Help_Context called without a map section. Thats why I tried the API thingi, and I do not get any errors there!

Do you know where my mistake could be?

Thanx, Stephan

BTW: Doesn`t VB call the exact same API I did? Wouldnt it be a god idea then to call the Api right away?

[McGenius]

1. I think that error might have occured because you did not assign initial ContextId to your form (btw you'd need to set KeyPreview = True as well).
2. Most probaly VB does call that same function. Is it better to use API? I'm not sure in this case. I like using API when subclassing is the only way and/or VB cannot do something that will satisfy performance. Otherwise use what's given first. Although, I would use API instead of OCXs such Common Dialog, SysInfo and some others wich are API wrappers anyway but create unnecessary dependencies ...

Cheers

[Sgt-Peppa]

I post my form and my -chm file for you. Could you take a look at it? I just cant find anything i've done wrong here. Just created a test .chm and a test proj.

pressing F1 makes that mistake pop up, and clicking my menu, makes the same mistake popup and blocks my mouse!

Thanx, Stephan

[Frans C]

I don't get an error at all. It works fine.

[Sgt-Peppa]

It does?

I am confused! Heres my error message:

[McGenius]

It works fine either way for me:

Private Sub mnuHilfe_Click()
    'Call HtmlHelp(Me.hWnd, Helpfile, HH_Display_Topic, ByVal 0&)
    SendKeys "{F1}"
End Sub

[blaff]

Edit: No error from the Menu, but I can confirm the error after pressing F1.

I changed the HelpContextID of form1 to 0. This solved the problem!

You could check the HTML-Help-Version (choose version from the system-menu of the help-window).

My versions:

HHCTRL.OCX 4.74.8793.0
HHA.DLL 4.74.8702.0

[Sgt-Peppa]

First of all thanx guys for your help,

at my Pc here at Home I dont get any Error Messages, just like you said! I just do not understnd this.

blaff I will be checking the version at work tomorrow, i`ll let you know what version I am working with!

Thanx again, cu

Stephan

[Sgt-Peppa]

Well guys thanks for helping.

I created a new Help Project, tried that one, and it worked perfectliy allright! Just cant imagine what went wrong with that other file! Well anyways, thanx to all of you!

Have a nice day,


Stephan