1 f
= Function(MenuHandle
, 'as_Menu', (Handle
, 'h', InMode
))
4 f
= Method(Handle
, 'as_Resource', (MenuHandle
, 'h', InMode
))
7 # The following have "Mac" prepended to their names in the include file
8 # since UH 3.1, sigh...
9 f
= Function(MenuHandle
, 'GetMenu',
10 (short
, 'resourceID', InMode
),
14 f
= Method(void
, 'AppendMenu',
15 (MenuHandle
, 'menu', InMode
),
16 (ConstStr255Param
, 'data', InMode
),
20 f
= Method(void
, 'InsertMenu',
21 (MenuHandle
, 'theMenu', InMode
),
22 (short
, 'beforeID', InMode
),
26 f
= Function(void
, 'DeleteMenu',
27 (short
, 'menuID', InMode
),
31 f
= Method(void
, 'InsertMenuItem',
32 (MenuHandle
, 'theMenu', InMode
),
33 (ConstStr255Param
, 'itemString', InMode
),
34 (short
, 'afterItem', InMode
),
38 f
= Method(void
, 'EnableMenuItem',
39 (MenuHandle
, 'theMenu', InMode
),
40 (UInt16
, 'item', InMode
),
44 f
= Method(void
, 'CheckMenuItem',
45 (MenuRef
, 'theMenu', InMode
),
46 (short
, 'item', InMode
),
47 (Boolean
, 'checked', InMode
),
52 f
= Function(void
, 'DrawMenuBar',
58 # The following functions take an *optional* MenuRef as their first argument
61 f
= Function(ItemCount
, 'CountMenuItemsWithCommandID',
62 (OptMenuRef
, 'inMenu', InMode
),
63 (MenuCommand
, 'inCommandID', InMode
),
67 f
= Function(OSStatus
, 'GetIndMenuItemWithCommandID',
68 (OptMenuRef
, 'inMenu', InMode
),
69 (MenuCommand
, 'inCommandID', InMode
),
70 (UInt32
, 'inItemIndex', InMode
),
71 (MenuRef
, 'outMenu', OutMode
),
72 (MenuItemIndex
, 'outIndex', OutMode
),
76 f
= Function(void
, 'EnableMenuCommand',
77 (OptMenuRef
, 'inMenu', InMode
),
78 (MenuCommand
, 'inCommandID', InMode
),
82 f
= Function(void
, 'DisableMenuCommand',
83 (OptMenuRef
, 'inMenu', InMode
),
84 (MenuCommand
, 'inCommandID', InMode
),
88 f
= Function(Boolean
, 'IsMenuCommandEnabled',
89 (OptMenuRef
, 'inMenu', InMode
),
90 (MenuCommand
, 'inCommandID', InMode
),
94 f
= Function(OSStatus
, 'SetMenuCommandMark',
95 (OptMenuRef
, 'inMenu', InMode
),
96 (MenuCommand
, 'inCommandID', InMode
),
97 (UniChar
, 'inMark', InMode
),
101 f
= Function(OSStatus
, 'GetMenuCommandMark',
102 (OptMenuRef
, 'inMenu', InMode
),
103 (MenuCommand
, 'inCommandID', InMode
),
104 (UniChar
, 'outMark', OutMode
),
108 f
= Function(OSStatus
, 'GetMenuCommandPropertySize',
109 (OptMenuRef
, 'inMenu', InMode
),
110 (MenuCommand
, 'inCommandID', InMode
),
111 (OSType
, 'inPropertyCreator', InMode
),
112 (OSType
, 'inPropertyTag', InMode
),
113 (ByteCount
, 'outSize', OutMode
),
117 f
= Function(OSStatus
, 'RemoveMenuCommandProperty',
118 (OptMenuRef
, 'inMenu', InMode
),
119 (MenuCommand
, 'inCommandID', InMode
),
120 (OSType
, 'inPropertyCreator', InMode
),
121 (OSType
, 'inPropertyTag', InMode
),