Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Hide menu bar item
Message
From
13/02/2013 14:15:49
 
General information
Forum:
Visual FoxPro
Category:
Menus & Menu designer
Environment versions
Visual FoxPro:
VFP 9
Miscellaneous
Thread ID:
01565919
Message ID:
01565937
Views:
60
>>Hi !
>>
>>I want hide menu bar item in run time, i try use skpbar to return if menu is enabled or disable but this function not return the correct value, someone know how i can hide menu item?
>>
>>thanks
>
>What expression are you using?

I try the code below, with the _msysmenu it is work bat the menu item does not work...

thanks
y = CNTPAD('_msysmenu')
	v = 0
	FOR x = 1 TO y
	
		IF SKPPAD('_msysmenu', GETPAD('_msysmenu', x-v))
			RELEASE PAD (GETPAD('_msysmenu', x-v)) of _msysmenu
			v = v + 1
		ENDIF 
	ENDFOR 

	y = CNTPAD('_msysmenu')
	v = 0
	FOR x = 1 TO y
		bn = LOWER(LEFT(STRTRAN(PRMPAD('_msysmenu',GETPAD('_msysmenu',x)), [ ]),10))
		bb = CNTBAR(bn)
		bv = 0
		FOR bx = 1 TO bb
		
			IF SKPBAR(bn, GETBAR(bn, bx-bv))
				RELEASE BAR (GETBAR(bn, bx-bv) ) OF &bn
				bv = bv + 1
			ENDIF
		ENDFOR 
		
		
	ENDFOR 
Atenciosamente,
Welington Lourenço Melo de Paula BH / MG
welingtonl@yahoo.com.br
Previous
Reply
Map
View

Click here to load this message in the networking platform