>Hi All,
>
>I need to open the sysmenu of a form via code. How to do this?
>
>Agnes

Agnes,

I have this code in the Click of a form's commandbutton

#define WM_COMMAND 0x0111
#define WM_SYSCOMMAND	0x0112

#define SC_KEYMENU	0xF100
#define	WM_CHAR 0x0102

declare integer PostMessage in user32.dll long, long, long, long

&& select the menu
=PostMessage (m.thisform.hwnd, WM_SYSCOMMAND, SC_KEYMENU, 0)

&& make it drop down
=PostMessage (m.thisform.hwnd, WM_CHAR , asc(space(1)), 0)