[futurebasic] Re: [FB] Submenu

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

From: Robert Covington <artlythere@...>
Date: Fri, 23 Oct 2009 12:12:36 -0400
Your question indicates that you don't know the menu statement well.

Something like?

fn InstallNoResHierMenu ( _mCommand,_mCompileItem,  _CompileOptionMenu )

You need a Compile item in the Command menu, the hierarchical menu  
will be added as the submenu to that item.

You can't take what I posted verbatim, that was for an  
OpenRecentMenu. So change it to something you will be using...

rc

On Oct 23, 2009, at 10:55 AM, Brian Heibert wrote:

> Okay I added the local fn InstallNoResHierMenu into my program
>
> what do I put where you have _fOpenRecentItem, _OpenRecentMenu
> because
>
> Menu _mCommand,0,_enable, "Command"
> Menu _mCommand,_RunGame,_enable, "/RRun Game..."
> Menu _mCommand,_cmdSep,_enable, "-"
> fn InstallNoResHierMenu ( _mCommand,_fOpenRecentItem,   
> _OpenRecentMenu )
>
> I want to add a sub menu to my command menu
>
> Compile->
>   -> PowerPC
>   -> Universal Binary
>   -> Intel
>
> Thanks,
>
> Brian
>
> On Oct 22, 2009, at 10:05 PM, Robert Covington wrote:
>
>> local mode
>> local fn InstallNoResHierMenu ( parentMenu, parentItem, childMenu )
>>
>> long if fn SetMenuItemHierarchicalID( fn GetMenuHandle 
>> (parentMenu), parentItem, childMenu ) = _noErr
>> INSERTMENU(FN NEWMENU(childMenu,""), -1)
>> end if
>>
>> end fn
>>
>> Example..
>>
>> fn InstallNoResHierMenu ( _FileMenu,_fOpenRecentItem,   
>> _OpenRecentMenu )
>>
>>
>> Then populate with usual menu statement, using your  
>> _OpenRecentMenu menu ID equivalent
>>
>>
>> (your id)
>>
>> rc
>>
>> On Oct 22, 2009, at 9:41 PM, Brian Heibert wrote:
>>
>>> Is it possible to create a sub menu in one of my menus in code
>>> using a MENU statement
>>>
>>> instead of using MENU resources?  i am not using MENU resources  
>>> to create my menus
>>>
>>> I am using MENU statements
>>>
>>> Brian
>>>
>>> --
>>> To unsubscribe, send ANY message to: futurebasic- 
>>> unsubscribe@...
>>>
>>
>> --
>> To unsubscribe, send ANY message to: futurebasic- 
>> unsubscribe@...
>>
>
> --
> To unsubscribe, send ANY message to: futurebasic- 
> unsubscribe@...
>