>>>>>>>>>How do you release other FORMS opened from
>>>>>>>>>within a FORM.. I know I asked this question before
>>>>>>>>>and I thought I saved the answer. I want to close
>>>>>>>>>two opened FORMS.... thanks..rob
>>>>>>>>
>>>>>>>>***frmMain Destroy event (if you want to release 'child' forms too):
>>>>>>>>if type("Thisformset.frmDetail1")=="O"
>>>>>>>> Thisformset.frmDetail1.release()
>>>>>>>>endif
>>>>>>>>if type("Thisformset.frmDetail2")=="O"
>>>>>>>> Thisformset.frmDetail2.release()
>>>>>>>>endif
>>>>>>>>....
>>>>>>>>If you don't have Formset, try to use direct references to forms (from DO Form NAME clause).
>>>>>>>
>>>>>>>thanks Edward..these FORMS are not in a FORMSET yet, but
>>>>>>>as single FORMS I will like to release them.
>>>>>>>myform.release() does not seem to work.
>>>>>>
>>>>>>Look at DO FORM command. Does it have NAME clause? One thing beforehand: you can always use RELEASE WINDOW myform (to other UT members: don't crtiticize me too much for this not OO advice, please).
>>>>>
>>>>>DO FORM does have a NAME clause, but I want to release a FORM.
>>>>>How can you release a FORM with a DO FORM command?
>>>>
>>>>You can't. But if you give the form an explicit name when you DO it, you can use that name to Release: _screen.formname.release.
>>>
>>>I code this..
>>>DO FORM myform NAME anyform
>>>wait
>>>_screen.anyform.release
>>>
>>>this did not work...
>>
>>Where did you put this code? You realize that after you DO a form, control is passed to that form and does not return to the calling procedure until control is surrendered back? For debugging try:
>>
>>look at what _screen.activeform.name returns. Try to reference the form using that name.
>>
>>You are on the right track, I'm sure there is just something silly holding you up...
>
>Hi Erik - My problem is, I am trying to release a FORM that is not active
>and not part of a FORMSET.
>How do you release a FORM that is not the active FORM?
>I could use RELEASE WINDOW myform (thanks Edward)but I rather not.
>I tried DO FORM myform NAME anyform
>then....
>_SCREEN.anyform.RELEASE - but this does not work because anyform is not the
>active FORM.
>any more ideas?..thanks...rob

For nLoop=1 to _Screen.Formcount
If _Screen.Forms(nLoop).Name="myform"
_Screen.Forms(nLoop).Release
Endif
Endfor