FoxPro/Visual FoxPro - objeto form

tengo este codigo:

PUBLIC oForm
oForm = NEWOBJECT("MiForm")
oForm.SHOW

DEFINE CLASS MiForm AS FORM
TOP = 0
LEFT = 0
DOCREATE = .T.
CAPTION = "Ejemplo de formulario vacio "
WINDOWSTATE = 0
NAME = "Form1"
WIDTH = 640
HEIGHT = 300
ENDDEFINE

thisform.addobject("boton","commandbutton")
thisform.AddObject("grilla","grid")

el tema es que cuando lo ejecuto ,me muestra el form vacio ,sin los dos componentes que agregue con addobject.por favor ayuda. gracias

proba con lo sig.

PUBLIC oForm
oForm = NEWOBJECT("MiForm")
oForm.SHOW
oForm.addobject("boton","commandbutton")
oForm.AddObject("grilla","grid")
oForm.boton.left=10
oForm.boton.top=10
oForm.boton.visible=.t.
oForm.grilla.left=50
oForm.grilla.top=50
oForm.grilla.visible=.t.

DEFINE CLASS MiForm AS FORM
TOP = 0
LEFT = 0
DOCREATE = .T.
CAPTION = "Ejemplo de formulario vacio "
WINDOWSTATE = 0
NAME = "Form1"
WIDTH = 640
HEIGHT = 300
ENDDEFINE