>When entering an EditBox I'd like to place the cursor at the end of the entered text (if any), so the user just has to press Enter and can start writing.
>
>In order to do that, I placed
>

>   * _EditBox GotFocus
>   Keyboard '{LEFTMOUSE}'
>   Keyboard '{CTRL+END}'
>
>   * _EditBox Valid
>   If Getfldstate(Justext(This.ControlSource),Juststem(This.ControlSource)) <> 1
>	* Do all sorts of stuff to prevent the user from
>        * closing the form and leaving this record
>   Endif
>

>
>This behaviour is not consistent with actually clicking the left mousebutton and pressing CTRL+END from the keyboard, which does not alter the state of the _EditBox.ControlSource.


The

 Keyboard '{LEFTMOUSE}' PLAIN

it shoots an InterctiveChange
and then than before Valid () VFP writes the Value in Controlsource.
It is a bug for me.

But it is useless, here.

Then.

* this is sufficient
Keyboard '{CTRL+END}' PLAIN

and this, also it is :

This.SelStart = 0x7FFFFFFF

But this is not correct because it fail with value = NULL:

This.SelStart = LEN(this.value)