Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Remove menu completely
Message
 
 
To
25/04/2001 13:51:28
General information
Forum:
Visual FoxPro
Category:
Menus & Menu designer
Miscellaneous
Thread ID:
00499733
Message ID:
00500351
Views:
20
>I am writing an application where the customer does not want to use the standard VFP menu. Instead, he would like large buttons centered on the screen. I can't seem to completely remove the system menu. I thought 'set sysmenu to' would do it but it leaves a single 'Format' selection.

Everyone else gave you the right answer. Here is another way to do it in a completely esoteric (read as - Don't try this at home unless you have too much time on your hands) way.
declare integer GetActiveWindow in user32
declare integer GetMenu in user32 integer hwnd
declare integer SetMenu in user32 integer hwnd, integer hmenu
declare integer DestroyMenu in user32 integer hmenu

local lnh, lnm
lnh = GetActiveWindow()
lnm = GetMenu(lnh)
DestroyMenu(lnm)
SetMenu(lnh,0)
Why do in one line what you can do in 9 lines? < bg >
Larry Miller
MCSD
LWMiller3@verizon.net

Accumulate learning by study, understand what you learn by questioning. -- Mingjiao
Previous
Reply
Map
View

Click here to load this message in the networking platform