* EditBox GotFocus >This.SelStart = LEN(This.Value) >This.SelLength = 0 >>>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.
>> * _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 >>>>