_screen.AddProperty("oTimer", NEWOBJECT("LaunchForm")) > >DEFINE CLASS LaunchForm AS Timer > Interval = 10 > Enabled = .F. > > PROCEDURE Init > This.Enabled = .T. > ENDPROC > > PROCEDURE Timer > This.Enabled = .F. > DO FORM MyForm Linked > _SCREEN.oTimer = Null > ENDPROC >ENDDEFINE >The form behaved normally with the above code (i.e. Escape worked).