FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Como saber si es submenu, en menu?
Posts: 418
Joined: Wed Nov 26, 2008 06:33 PM
Como saber si es submenu, en menu?
Posted: Fri Dec 13, 2013 09:47 PM

Saludos foro.

Para poner bitmap's aleatorios en un menu, necesito saber si la opcion del menu corresponde a un submenu, para poder asignarle un bitmap. Pero como puedo identidicar desde la clase "Menu" u otra, si esta opcion es un submenu.
Algo asi, por ejemplo

MENU oMenu
MENUITEM "&Test"
MENU
MENUITEM ACTION .. ACCELERATOR ACC_ALT, VK_F2 // este es un submenu
MENUITEM ACTION .. ACCELERATOR ACC_CONTROL, VK_F2
SEPARATOR
MENUITEM ACTION oWnd:End() ACCELERATOR 0, VK_F2
ENDMENU
MENUITEM
MENU
MENUITEM ACTION // este es un submenu
MENUITEM ACTION .. ACCELERATOR ACC_SHIFT, VK_F2
MENUITEM
ENDMENU
MENU
MENUITEM
MENU
MENUITEM FILE "..\bitmaps\red.bmp" MESSAGE "Red Color"
MENUITEM FILE "..\bitmaps\green.bmp" MESSAGE "Green Color"
MENUITEM FILE "..\bitmaps\yellow.bmp" MESSAGE "Yellow Color"
MENUITEM FILE "..\bitmaps\cyan.bmp" MESSAGE "Cyan Color"
MENUITEM FILE "..\bitmaps\magenta.bmp" MESSAGE "Magenta Color"
ENDMENU
ENDMENU
ENDMENU

Gracias.

Noé Aburto Sánchez
Tec. Prog. de Sistemas. -Morelia, Mich. México.
fwh 20.06, Harbour 3.2.0, bcc 7.4
TsBrowse 9.0, TsButton 7.0, xEdit 6.1
naburtos@gmail.com, noeaburto67@hotmail.com

Continue the discussion