>Hi,
>
>Do you know what would cause the error?
>

>cannot redefine THIS.
>

>
>TIA

This is the code that caused the above error. Note that I am trying to create a reference to a window 3 times. What happens is the 1st time the actual error shows (dreaded ... error reading .... myprg.fxp)

But on the 2nd and 3rd time, the error is "CANNOT REDEFINE THIS."

Of course, I will remove this code that tries to instantiate the window 3 times. But I would to learn what causes it.

Here is the code:

FOR iTry = 1 TO 3
		
	*-- Start with No Problem
	lProblem = .F.
	TRY 
		aAppForms[nRow,5] = NEWOBJECT( aAppForms[nRow,3], aAppForms[nRow,6] )
	CATCH TO oError
		lProblem = .T.
		cCompName = GetEnv("COMPUTERNAME")
		TRY 
	 		STRTOFILE( TTOC(DATETIME()) + " Try: " + ALLTRIM(STR(iTry)) + " Failed to 
                    create NEWOBJECT() in OpenAppForm() Class: " + aAppForms[nRow,3] + " Lib: " + 
                    aAppForms[nRow,6]  + oError.message + CHR(13) + CHR(10), GetGlobal(2) + 
                   "create_object_problems.log", 1 )
	 	CATCH 
	 	ENDTRY 
	ENDTRY 
	IF lProblem
        	*-- Wait 2 seconds and then try again.
		INKEY(2)
		LOOP 
	ELSE 
		EXIT 			
	ENDIF 
ENDFOR