Get menu item key
Get menu item key ( menu ; menuItem {; processo} ) -> Resultado
| Parâmetro | Tipo | Descrição | |
|---|---|---|---|
| menu | Inteiro longo, MenuRef | 🡒 | Número de menu ou menu de referência |
| menuItem | Inteiro longo | 🡒 | Número de item de Menu item ou -1 para o último item adicionado |
| processo | Inteiro longo | 🡒 | Número de referência de processo |
| Resultado | Inteiro longo | 🡐 | Código de caractere da tecla de atalho padrão associada com o item de menu |
Descrição
O comando Get menu item key devolve o código do atalho Ctrl (Windows) ou Comando (Mac OS) para o comando de menu cujo número ou referência de menu se passa em menu e cujo número de comando se passa em menuItem. Pode passar -1 em menuItem para indicar o último elemento adicionado a menu.
Se omite o parâmetro processo, Get menu item key é aplicado a barra de menus do processo atual. Do contrario, Get menu item key é aplicado a barra de menus do processo atual cujo número de referência é passado em processo.
Nota: é passado um MenuRef em menu, ou parâmetro processo é inútil e será ignorado.
Se o comando de menu não tiver nenhum atalho associado ou se o parâmetro menuItem designa um submenu hierárquico, Get menu item key devolve 0 (zero).
Exemplo
Para obter um atalho associado com um comando de menu, é útil implementar uma estrutura de programação do seguinte tipo:
If(Get menu item key(mimenu;1)#0)
$modificadores:=Get menu item modifiers(mymenu;1)
Case of
:($modificadores=Option key mask)
...
:($modificadores=Shift key mask)
...
:($modificadores=Option key mask+Shift key mask)
...
End caseEnd if