mirror of
https://github.com/AdaCore/cpython.git
synced 2026-02-12 12:57:15 -08:00
caa994db59
- The output MenuRef of GetMenuItemHierarchicalMenu() may be NULL. - Added support for optional MenuObj arguments - Added a bunch of calls as functions with an optional MenuObj first argument. The same calls already exist as methods, but then the first arg isn't optional... The method versions could go as far as I'm concerned. Jack?
140 lines
3.4 KiB
Python
140 lines
3.4 KiB
Python
f = Function(void, 'OpenDeskAcc',
|
|
(Str255, 'name', InMode),
|
|
condition='#if !TARGET_API_MAC_CARBON'
|
|
)
|
|
functions.append(f)
|
|
|
|
f = Function(MenuHandle, 'as_Menu', (Handle, 'h', InMode))
|
|
functions.append(f)
|
|
|
|
f = Method(Handle, 'as_Resource', (MenuHandle, 'h', InMode))
|
|
methods.append(f)
|
|
|
|
# The following have "Mac" prepended to their names in the include file
|
|
# since UH 3.1, sigh...
|
|
f = Function(MenuHandle, 'GetMenu',
|
|
(short, 'resourceID', InMode),
|
|
)
|
|
functions.append(f)
|
|
|
|
f = Method(void, 'AppendMenu',
|
|
(MenuHandle, 'menu', InMode),
|
|
(ConstStr255Param, 'data', InMode),
|
|
)
|
|
methods.append(f)
|
|
|
|
f = Method(void, 'InsertMenu',
|
|
(MenuHandle, 'theMenu', InMode),
|
|
(short, 'beforeID', InMode),
|
|
)
|
|
methods.append(f)
|
|
|
|
f = Function(void, 'DeleteMenu',
|
|
(short, 'menuID', InMode),
|
|
)
|
|
functions.append(f)
|
|
|
|
f = Method(void, 'InsertMenuItem',
|
|
(MenuHandle, 'theMenu', InMode),
|
|
(ConstStr255Param, 'itemString', InMode),
|
|
(short, 'afterItem', InMode),
|
|
)
|
|
methods.append(f)
|
|
|
|
f = Method(void, 'EnableMenuItem',
|
|
(MenuHandle, 'theMenu', InMode),
|
|
(UInt16, 'item', InMode),
|
|
)
|
|
methods.append(f)
|
|
|
|
f = Method(void, 'CheckMenuItem',
|
|
(MenuRef, 'theMenu', InMode),
|
|
(short, 'item', InMode),
|
|
(Boolean, 'checked', InMode),
|
|
)
|
|
methods.append(f)
|
|
|
|
|
|
f = Function(void, 'DrawMenuBar',
|
|
)
|
|
functions.append(f)
|
|
|
|
|
|
#
|
|
# The following functions take an *optional* MenuRef as their first argument
|
|
#
|
|
|
|
f = Function(ItemCount, 'CountMenuItemsWithCommandID',
|
|
(OptMenuRef, 'inMenu', InMode),
|
|
(MenuCommand, 'inCommandID', InMode),
|
|
condition='#if TARGET_API_MAC_CARBON',
|
|
)
|
|
functions.append(f)
|
|
|
|
f = Function(OSStatus, 'GetIndMenuItemWithCommandID',
|
|
(OptMenuRef, 'inMenu', InMode),
|
|
(MenuCommand, 'inCommandID', InMode),
|
|
(UInt32, 'inItemIndex', InMode),
|
|
(MenuRef, 'outMenu', OutMode),
|
|
(MenuItemIndex, 'outIndex', OutMode),
|
|
condition='#if TARGET_API_MAC_CARBON',
|
|
)
|
|
functions.append(f)
|
|
|
|
f = Function(void, 'EnableMenuCommand',
|
|
(OptMenuRef, 'inMenu', InMode),
|
|
(MenuCommand, 'inCommandID', InMode),
|
|
condition='#if TARGET_API_MAC_CARBON',
|
|
)
|
|
functions.append(f)
|
|
|
|
f = Function(void, 'DisableMenuCommand',
|
|
(OptMenuRef, 'inMenu', InMode),
|
|
(MenuCommand, 'inCommandID', InMode),
|
|
condition='#if TARGET_API_MAC_CARBON',
|
|
)
|
|
functions.append(f)
|
|
|
|
f = Function(Boolean, 'IsMenuCommandEnabled',
|
|
(OptMenuRef, 'inMenu', InMode),
|
|
(MenuCommand, 'inCommandID', InMode),
|
|
condition='#if TARGET_API_MAC_CARBON',
|
|
)
|
|
functions.append(f)
|
|
|
|
f = Function(OSStatus, 'SetMenuCommandMark',
|
|
(OptMenuRef, 'inMenu', InMode),
|
|
(MenuCommand, 'inCommandID', InMode),
|
|
(UniChar, 'inMark', InMode),
|
|
condition='#if TARGET_API_MAC_CARBON',
|
|
)
|
|
functions.append(f)
|
|
|
|
f = Function(OSStatus, 'GetMenuCommandMark',
|
|
(OptMenuRef, 'inMenu', InMode),
|
|
(MenuCommand, 'inCommandID', InMode),
|
|
(UniChar, 'outMark', OutMode),
|
|
condition='#if TARGET_API_MAC_CARBON',
|
|
)
|
|
functions.append(f)
|
|
|
|
f = Function(OSStatus, 'GetMenuCommandPropertySize',
|
|
(OptMenuRef, 'inMenu', InMode),
|
|
(MenuCommand, 'inCommandID', InMode),
|
|
(OSType, 'inPropertyCreator', InMode),
|
|
(OSType, 'inPropertyTag', InMode),
|
|
(ByteCount, 'outSize', OutMode),
|
|
condition='#if TARGET_API_MAC_CARBON',
|
|
)
|
|
functions.append(f)
|
|
|
|
f = Function(OSStatus, 'RemoveMenuCommandProperty',
|
|
(OptMenuRef, 'inMenu', InMode),
|
|
(MenuCommand, 'inCommandID', InMode),
|
|
(OSType, 'inPropertyCreator', InMode),
|
|
(OSType, 'inPropertyTag', InMode),
|
|
condition='#if TARGET_API_MAC_CARBON',
|
|
)
|
|
functions.append(f)
|
|
|