>Why don't you simply step through the code with the debugger?
>
Tore,

Do you see where is a bug in this small piece of code

   FOR lnI = _screen.FormCount TO 1 STEP - 1
   			oAppObj.write_log('Releasing form ' + _screen.Forms[m.lnI].name,program(),'2')
   			IF TYPE('_screen.Forms[m.lni]') = 'O'
	       _screen.Forms[m.lnI].Release()
	       endif
   NEXT

why does it generate Forms is not an object ?