Joao,

Below are my comments on the code sample

Form1

The following code overrides the MyForm class code for the gotfocus

form1.gotfocus
do mymenu.mpr
form1.command1.click
do form myform

myform && form class
myform.init

The name of the system menu is mSysmenu not Mysysmenu

PUSH MENU mysysmenu

myform.gotfocus

This code is overridden in the form instance above so it never gets executed

do myform_menu.mpr
myform.destroy

If you misspelled the menu name in the Init above then this line will find no menu on the stack to POP

POP MENU Msysmenu