>With VFP8 the code below works perfect. When I click on text? he is selected.
>
>But with VFP9 when I click with mouse on textbox? he is not selected.
>
>I don't understand where is my mistake.
>

This code calls TextBox::Gotfocus 2 times;
before VFP9 a bug arrested the sequence of the events,
therefore MouseDown, MouseUp, Click did not happen and the SelectOnEntry remained applied.
On VFP9 the bug is killed and then MouseDown, MouseUp are executed.
The solution is simple:
To arrest the sequence with NODEFAULT.

>

PUBLIC oform1
>
>oform1=NEWOBJECT("form1")
>oform1.Show
>RETURN
>
>DEFINE CLASS form1 AS form
>
>
>	Top = 0
>	Left = 0
>	Height = 123
>	Width = 319
>	DoCreate = .T.
>	Caption = "Form1"
>	Name = "Form1"
>
>
>	ADD OBJECT text1 AS textbox WITH ;
>		Alignment = 3, ;
>		Value = 0.00, ;
>		Height = 25, ;
>		Left = 34, ;
>		SelectOnEntry = .T., ;
>		Top = 27, ;
>		Width = 81, ;
>		Name = "Text1"
>
>
>	ADD OBJECT text2 AS textbox WITH ;
>		Alignment = 3, ;
>		Value = 0.00, ;
>		Height = 25, ;
>		Left = 163, ;
>		SelectOnEntry = .T., ;
>		Top = 27, ;
>		Width = 81, ;
>		Name = "Text2"
>
>
>	PROCEDURE text1.GotFocus
           if m.this.SelectOnEntry
		TextBox::GotFocus
                NODEFAULT
           endif
>	ENDPROC
>
>
>	PROCEDURE text2.GotFocus
>		TextBox::GotFocus
                NODEFAULT
>	ENDPROC
>
>
>ENDDEFINE