>FOR n = _screen.formcount to 1
> _screen.forms[n].Release()
>ENDFOR

You can place that directly after the read events statement