[futurebasic] Re: [FB] Carbonizing Hierarchical Menus

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

From: Joe Lewis Wilkins <PepeToo@...>
Date: Mon, 28 Oct 2002 21:04:31 -0800
Thanks Alain. You're right. It was the Help Menu that has changed. The 
"other" Hierarchical are the same as pre-carbon, or so it would appear.

Joe Wilkins

Alain Pastor wrote:

> 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
>
>