Hi Mike & Tracy,

Please see Re: For each doesn't release all forms? Thread #1241310 Message #1241387 (and the whole thread)

>I'm trying to find and close all active forms. the problem is during run time form names are not used also there may be several forms with the same name. What is the correc way of doing this?
>
>

>LOCAL lnFormCount, k, dum
>
>*-- get a active form count
>lnFormCount = _screen.FormCount
>
>*-- get non found getout
>IF lnFormCount = 0
>	RETURN
>ENDIF
>
>*-- close all forms
>FOR k = lnFormCount TO 1 STEP -1
>	
>	dum = ALLTRIM(_screen.Forms(k).name) + '.Release()'
>	&dum
>	
>next
>