lnFormCount = _SCREEN.FORMCOUNT FOR I = 1 TO lnFormCount IF TYPE("_SCREEN.FORMS(I).BASECLASS") = "C _SCREEN.FORMS[I].RELEASE() ENDIF NEXT