Repro:
- run
- build a child with the button
- click on Top blue area or in Top title,
BUG: THE FORM IS NOT ACTIVATE ( a activate/mousedown/deactivate cycle is done )
- click on Top.TextBox, it is Activated and capture the focus

- click on SCREEN
- click on TOP blue area or in Top title
BUG: THE CHILD FORM IS ACTIVATE

The same with child in child forms.

PUBLIC oform1

oform1=NEWOBJECT("topForm")
oform1.SHOW


DEFINE CLASS topForm AS Scrollform 

	Caption = "TOP"
	BackColor = RGB(0,0,255)
	height	= 400
	width	= 600
	showWindow = 2

ENDDEFINE


DEFINE CLASS childForm AS Scrollform 

	Caption = "CHILD"
	BackColor = RGB(255,0,0)

	height	= 300	
	width = 500
	showWindow = 1

ENDDEFINE


DEFINE CLASS Scrollform AS form

	autocenter = .T.
	* comment next line and all work
	ScrollBars = 3	

	ADD OBJECT text1 AS textbox WITH ;
		Left = 5, ;
		Top = 5
		
	ADD OBJECT command1 AS commandbutton WITH ;
		Top = 30, ;
		Left = 5, ;
		Height = 27, ;
		Width = 84, ;
		Caption = "BUILD CHILD"

	PROCEDURE command1.Click
		formName = SYS(2015)
		=ADDPROPERTY(thisform,m.formName,CREATEOBJECT("childForm"))
		WITH GETPEM(thisForm,m.formName)
			.Name = m.formName
			.Height = thisForm.Height - 100
			.Width  = thisForm.Width - 100
			SHOW WINDOW (m.formName) IN WINDOWS (thisForm.name)
		ENDWITH
	ENDPROC

ENDDEFINE