Hi Paul,
I'm having a weird problem with the helpfiles when launched from FireFly (3.06). If I open the FireFly helpfile from the menu, everything is fine.
However, if I then also open the PowerBASIC helpfile from the menu, as I browse through the contents, nothing happens in that window, but the topics I select are displayed in the FireFly helpfile window! Most odd.
If I open PowerBASIC then FireFly it all works normally.
Any ideas why this might be?
Thanks.
Pete.
Your picture shows your situation. I tried to replicate it on my system with FF 3.06 and I cannot. Firefly and PowerBasic help appear in separate windows for me.
I am able to replicate the problem.
Pete's screen shot show the PowerBASIC's ACCEL ATTACH statement topic being selected but the help contents appear in the FireFly help window instead of the PowerBASIC's help window.
Yes, I'm able to replicate it too, this is the sequence:
1- Open FF Help
2- Open PB Help
3- Click on an item ON THE LEFT PANEL (See attachment), the detail will appear on FF Help window.
However, if you open the PB Help FIRST the problem does not occur.
I can replicate this on my system. The first time I tried it I was clicking on the right panel in the PowerBasic help and not the left panel. Very strange but I bet Paul has a quick fix.
PB screwed up their help file. I tried explaining it to them during Beta, but no one listened and they seem to not care about 3rd Party integration...especially with FF.
I am not sure this is a PB help file problem.
I am still not that familiar writing PB/FF codes yet so I do a quick one with VB6. The screen shot show there is no problem.
I open FF Help first followed by PBWin Help. I select the PBWin Byte (?) topic and the content appear in the PBWin help window.
The VB6 codes I use as follows, adapted from my VB6 project.
Option Explicit
Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hWnd As Long, _
ByVal lpOperation As String, _
ByVal lpFile As String, _
ByVal lpParameters As String, _
ByVal lpDirectory As String, _
ByVal nShowCmd As Long) As Long
Private Sub mnuHelp1_Click()
If ShellExecute(0, vbNullString, App.Path & "\FireFly.chm", vbNullString, vbNullString, vbNormalFocus) = 2 Then
MsgBox "The Help File, FireFly.chm, is missing. Unable to open it.", vbExclamation + vbOKOnly, "Help File Error"
End If
End Sub
Private Sub mnuHelp2_Click()
If ShellExecute(0, vbNullString, App.Path & "\PBWin.chm", vbNullString, vbNullString, vbNormalFocus) = 2 Then
MsgBox "The Help File, PBWin.chm, is missing. Unable to open it.", vbExclamation + vbOKOnly, "Help File Error"
End If
End Sub