[futurebasic] Re: [FB] Carbonizing Hierarchical Menus

Message: < previous - next > : Reply : Subscribe : Cleanse
Home   : October 2002 : Group Archive : Group : All Groups

From: Alain Pastor <apastor@...>
Date: Mon, 28 Oct 2002 21:45:30 +0100

Joe Lewis Wilkins wrote:
> Hi Guys,
> 
> I'm maybe half way through Carbonizing "the Book", though much editing 
> of the content will have to take place too, and I've finally got things 
> to Compile, except I'm stalled with the comment that the program cannot 
> continue because Hierarchical Menus are done differently. However, in 
> consulting the Reference Manual  I can not see anything that is 
> different than the way I was doing it pre-Carbon. Have any of you 
> Carbonized and HMenu? If so,any hints as to what the difference is?
> 
> BTW,  isn't Release 7 outstanding?
> 

Joe,

I use those with the Appearance runtime, seem to work so far:

local mode
local fn InstallHierMenu( parentMenu, parentItem, childMenu )
long if fn SetMenuItemHierarchicalID( fn GetMenuHandle(parentMenu), 
parentItem, childMenu ) = _noErr
InsertMenu( fn GetMenu(childMenu), -1 )
end if
end fn


local fn InstallHelpMenu
dim as handle @ helpMenu

long if fn HMGetHelpMenu( helpMenu, #_nil ) = _noErr
AppendMenu( helpMenu, "My Application Help" )
end if
end fn


-- 
Cheers,

A. Pastor