Mike,
When you add an object (like your TmrMess and lblZMess) you must set them to .null. before closing the form.

HTH
Barbara

>When I call this code from my app it works but I can't close the form
>
>Thanks in advance!
>
>
>
>xTmpFormMess = CREATEOBJECT("ApMess","Running Installation Please Wait...")
>
>DEFINE CLASS apMess AS FORM
> DoCreate = .T.
> CAPTION = 'Please Note!'
> WIDTH = 430
> WINDOWTYPE = 1
> VISIBLE = .T.
> AUTOCENTER = .T.
>
> ADD OBJECT lblZmess AS Label WITH ;
> AutoSize = .T., ;
> FontSize = 20, ;
> Caption = "", ;
> Height = 39, ;
> Left = 10, ;
> Top = 96, ;
> Width = 232
>
> ADD OBJECT tmrMess AS TIMER WITH ;
> INTERVAL = 3000
>
> PROCEDURE tmrMess.TIMER
> ? TIME()
> THISFORM.RELEASE()
> ENDPROC
>
> *-- Form init
> PROCEDURE INIT
> LPARAMETERS lcMessage
> THISFORM.lblZmess.CAPTION = lcMessage
> THISFORM.SHOW()
> ENDPROC
>ENDDEFINE