On Sep 18, 2006, at 5:03 PM, Robert Poland wrote:
Hi,
If I have several editfields that when I enter data and a CR the
focus steps to the next box I want the text, if any, to be
highlighted.
Like it would if I tabbed to the next field.
Any clues?
Code like this example in KeyDown will do all of the above. The
example is for a control 'array' of four editfields(MyEF(0)...MyEF(3)).
If Key = chr(13) then
dim num as integer
If index < 3 then 'if last editfield, go back to first one
num = index + 1
Else
num = 0
End
MyEF(num).SetFocus
MyEF(num).SelStart = 0
MyEF(num).SelLength = Len(MyEF(num).Text)
Return True
End
Best,
Jack
_______________________________________________
Unsubscribe or switch delivery mode:
<http://www.realsoftware.com/support/listmanager/>
Search the archives of this list here:
<http://support.realsoftware.com/listarchives/lists.html>
