Cetin, I've just been having another look at this:

It seems if I issue a NODefault in the GotFocus event, without a Setfocus, focus goes to the FIRST object in the Tab Order on the screen.
What I want to do is go to the NEXT object in the Tabindex, but without having to do an explicit MyObject.setfocus. i.e I always want it to go to whatever is the next object in the tabindex:

Pseudo code would be:-

GotFocus
---------
NoDefault
NextTabindex = This.Tabindex + 1
ObjectWhoseTabIndex=NextTabIndex.SetFocus

Is there a way of finding the object which has a particular Tabindex

The reason I want to do this is because I dont want to have to put in on every screen the actual object name. I want it to behave like the Return .f. on a when screen, i.e. it drops out of the currrent control and focus is set to whatever the next focus happens to be .

Regards,

Gerard











>>Hi.
>>I have a bunch of code in an old FPW app which I am trying to emulate in VFP
>>
>>Code goes as follows:
>>When Event:
>>Cmd1
>>Cmd2
>>cmd3
>>If MyTest1 = .F.
>> _Curobj=ObjNUm(MyNextField)
>>Endif
>>If Mytest2 = .F.
>> Return
>>Endif
>>
>>This works fine in FPW and the current control does not get focus if either Mytest1 or Mytest2 is false.
>>
>>If I try this in VFP When event (replacing _Curobj with a Set Focus,I get an error because this command is not allowed in the When event
>>
>>If I move the code to the GotFocus,the Return .f. does not leave the control
>>
>>Is there any way of leaving the above code in one of the controls(either GotFocus or When I guess) and getting the same result as a When in FPW.
>>
>>Regards,
>>
>>Gerard
>
>Gotfocus Event:
>Cmd1
>Cmd2
>cmd3
>If !MyTest1
> nodefault
> MyNextField.SetFocus()
>Endif
>If !Mytest2
> Return && ???
>Endif
>
>Cetin