Expected: form.Activate event it must to be the first fired event
when a form it is activated.

Repro:
- run
- the activepage.Activate event happen before the form.Activate
- ( another issue is: the page.deactivate is not fired when the form is deactivated )

clear
PUBLIC oform1

oform1=NEWOBJECT("form1")
oform1.Show
_screen.Show
oform1.Show
_screen.Show
oform1.Show

RETURN

DEFINE CLASS form1 AS form


	Height = 250
	Width = 285
	DoCreate = .T.
	AutoCenter = .T.
	Caption = "Form1"
	AllowOutput = .F.
	Name = "Form1"

	ADD OBJECT pageframe1 AS pageframe WITH ;
		ErasePage = .T., ;
		PageCount = 2, ;
		activepage = 2,;
		Top = 38, ;
		Left = 40, ;
		Width = 162, ;
		Height = 169		

	PROCEDURE Activate
		? "form activate"
	ENDPROC


	PROCEDURE pageframe1.Page1.Activate
		? "activate pageframe page1"
	ENDPROC

	PROCEDURE pageframe1.Page2.Activate
		? "activate pageframe page2"
	ENDPROC

ENDDEFINE