Cool, I had thought of that and reached for the for loop anyway, I like yours better. Mind if I put it on the wiki in the FormCollection topic?
>Yes, in fact that what I thought you had said (serves me right for not reading more carefully). This eliminates the problem of having the form move "up" in the order. Basically, what I do is something like
>lni = _SCREEN.FormCount
>DO WHILE lni > 0
> oForm = _SCREEN.Forms(lni)
> IF oForm.BaseClass = 'FORM'
> IF oForm.QueryUnload()
> oForm.Release
> ENDIF
> ENDIF
> lni = lni - 1
>ENDDO
>I'd say that any additional processing that would be caused by any existing toolbars is so insignificant as to be meaningless.
Roi
'MCP' Visual FoxPro
In Rome, there was a poem.
About a dog, who found two bone.
He lick the one, he lick the other.
He went pyscho, he drop dead!