I try to disable all control taborder but I don't find the optimal solution
My problem is the getContols("") get all object too and some object have ControlRef others haven't.
Now I use this code but i think it's to primitive:
panels() get with GetControls("")
My problem is the getContols("") get all object too and some object have ControlRef others haven't.
Now I use this code but i think it's to primitive:
B4X:
For cont=0 To ArrayLen(panels())-1
contType=ControlType(panels(cont))
If contType="fgButtons.fgButtons.fgGradientButtons" Then
objTab.FromControl(Control(panels(cont),"fgGradientButtons").ControlRef)
objTab.SetProperty("TabStop",False)
Else If panels(cont)="myclass.eventkey" OR contType="FormLib.FormLib" OR contType="System.Collections.ArrayList" OR contType="ScrollBar.ScrollBar" OR contType="dzEventsMagic.dzEventsMagic" OR contType="Door.Object" OR contType="Timer" OR contType="dzImage.ImageClass" OR contType="ImageLibEx.SlideShow" OR contType="ImageLibEx.BitmapEx"
'Do Nothing
Else
objTab.FromControl(panels(cont))
objTab.SetProperty("TabStop",False)
End If
Nextpanels() get with GetControls("")