You're right, CLEAR CLASS works.


>My mistake. I meant to tell you to use "CLEAR CLASS PreviewWindow". It actually clears the class definition from memory.
>
>
>>No, both don't work. RELEASE CLASS is only short for RELEASE CLASSLIB.
>>RELEASE PROCEDURE displays an error "Procedure file ... not found" (although the file exists, but the procedure is not set to this file.)
>>
>>
>>
>>>Christian,
>>>
>>>Try putting in a "RELEASE CLASS PreviewWindow" before the erases. You may also try using a "RELEASE PROCEDURE (lcDefFile)". Hopefully, this will take care of your problem.
>>>
>>>>Hello,
>>>>
>>>>I try to do the following:
>>>>

lcDefFile = FORCEEXT(SYS(2015), "PRG")
>>>>*
>>>>TEXT TO lcDefineClass TEXTMERGE NOSHOW
>>>>	DEFINE CLASS PreviewWindow AS Form
>>>>		SHOWWINDOW = 1
>>>>		DESKTOP = .T.
>>>>	ENDDEFINE
>>>>ENDTEXT
>>>>STRTOFILE(lcDefineClass, lcDefFile)
>>>>*
>>>>loPreviewWindow = NEWOBJECT("PreviewWindow", lcDefFile)
>>>>loPreviewWindow.SHOW()
>>>>*-- some work done here			
>>>>*-- Here I need to find the proper way to close the
>>>>*-- references.
>>>>*-- I try to get rid of the outstanding references but
>>>>*-- this does not work.
>>>>RELEASE loPreviewWindow
>>>>*-- This will give an error: Procedure file ... not found.
>>>>*-- RELEASE CLASSLIB (FORCEEXT(lcDefFile, "FXP"))
>>>>ERASE (lcDefFile)
>>>>*-- The next one gives an error, Outstanding references...
>>>>ERASE (FORCEEXT(lcDefFile, "FXP"))

>>>>Can somebody help me here?