Repro:
run:
- look the WONTOP and ACTIVEFORM values
- click on the VFP title
- form1 is deactivated and WONTOP and ACTIVEFORM are changed
* issue
* _SCREEN.Activate is not fired
- click on form1
- look
* bug
- click on _SCREEN background area ( _VFP client window )
- form1 is deactivated but WONTOP and ACTIVEFORM aren't changed

WITH NEWOBJECT("form1")
	.Show
ENDWITH

DEFINE CLASS form1 AS form

	ShowWindow = 2 && try with 1 or 0 and Desktop=.F./.T. the situation is still worse
	AUTOCENTER = .t.
	
	ADD OBJECT timer1 AS timer WITH ;
		Top = 38, ;
		Left = 184, ;
		Height = 23, ;
		Width = 23, ;
		Interval = 1000, ;
		Name = "Timer1"


	PROCEDURE Activate
		DEBUGOUT "+++++++++++++++++ ACTIVATE"
	ENDPROC


	PROCEDURE Deactivate
		DEBUGOUT "-------------------- DEACTIVATE"
	ENDPROC


	PROCEDURE Unload
		WAIT CLEAR
	ENDPROC


	PROCEDURE Load
		ACTIVATE WINDOW "DEBUG OUTPUT" 
		ADDPROPERTY(THIS,"LOCKME",THIS)
	ENDPROC


	PROCEDURE timer1.Timer
		DEBUGOUT "WONTOP = ",WONTOP();
                 ,"ACTIVEFORM =";
                 ,IIF(TYPE("_SCREEN.ACTIVEFORM")=="O",_SCREEN.ACTIVEFORM.NAME,"SCREEN")
	ENDPROC

ENDDEFINE