>>>How can I get a shortcut menu when no forms are displayed, just the normal menu (wait state). I want to right click anywhere on the screen and a shortcut menu to appear. I know how to do it when forms are displayed.
>>>
>>>Thanks
>>
>>Here's a neat trick I learned to allow you to put code into any _SCREEN event:
>>
>>* screenmethods.prg
>>*
>>* Use the following to modify _SCREEN methods:
>>*_SCREEN.NewObject("oSH","ScreenHook","screenmethods.prg")
>>*
>>DEFINE CLASS ScreenHook AS custom
>>oscr = _SCREEN
>>PROCEDURE oscr.RightClick
>> DO yourmenu.mpr
>>ENDPROC
>>ENDDEFINE
>>
>
>Fred,
>
>For some reason, it doesn't work. I'm experiminting with the menu right now, using Mike Helland technique. The menu looks nice, but I can not add it to the screen by right click.
You need to do the _SCREEN.NewObject() call from the command window (or another .PRG).
Try creating a oscr.Resize procedure and puting some code in there, it should work.