Well, for anyone who cares - here is how I solved this. I manually handled the skipping of the first two fields. I figured they could get focus three ways:
1) User clicks
2) Tab at col10, or shift-tab at col3
3) Default focus by activate()
I made col1 and col2 read only.
I made the "MouseDown" event of the first two Columns be:
IF (nButton <> 2)
NODEFAULT
THIS.Parent.Parent.col3.SetFocus()
ENDIF
and put my rightClick() event as I normally would.
***
The Grid.SetFocus() Event does:
THIS.col3.SetFocus
***
The col3.text1.KeyPress does:
IF (nKeycode = 15 .AND. nShiftAltCtrl = 1) && shift-tab
THIS.Parent.Parent.col10.SetFocus() && last column
NODEFAULT
ENDIF
***
The col10.KeyPress does:
IF (nKeycode = 9 .AND. nShiftAltCtrl = 0)
THIS.Parent.Parent.col3.Setfocus()
NODEFAULT
ENDIF
And that seems to work. I know it's not nice, and it is not International, but for us, right now, it will work ;)
Tim
Previous
Reply
View the map of this thread
View the map of this thread starting from this message only
View all messages of this thread
View all messages of this thread starting from this message only