Hi,
I am trying to get the Apple help window to open up and display my application's help documentation
I got it to work with the ? buttons in my application
But not the StoryTeller Help menuitem in the Help menu (created from plist)
case _kHMHelpMenuID
if ( menuItem == 1 ) then fn HBGotoPage( 0, 0 )
The above should open the help window and display the help documentation
But nothing is happening when I click on the Help menuitem in the Help menu
local fn DoMenu
dim as long menuID,itemID
dim as SInt16 menuID
dim as MenuItemIndex menuItem
menuID = MENU(_menuID)
itemID = MENU(_itemID)
select (menuID)
case _kHMHelpMenuID
if ( menuItem == 1 ) then fn HBGotoPage( 0, 0 )
case _applemenu
select (itemID)
case 1
//print itemID
fn ShowAbout
case 2
FN OpenCmdPipe ("open "+"http://www.insanemonkeysoftware.com/store.html","","")
end select
case _EditMenu
select (itemID)
case _DeSelect
SETSELECT 0, 32767
end select
case _FileMenu
select (itemID)
case _NewProject
fn CreateNewProject
case _OpenProject
fn FileOpen
end select
end select
end fn
'~'1
fn HBRegister()
// main
on dialog fn DoDialog
on menu fn DoMenu
fn BuildUIFromNib
do
HandleEvents
until gFBQuit
Brian