sub form1_SetTabOrder
For i = 0 to ArrayList1.Count - 1
Control( ArrayList1.Item(i) ).BringToFront
Next
end sub
Thanks for the link, I remember when that was published though I haven't seen it for years, nor the story of Mel. I have saved them to show and explain the to a younger generation! As you and I, apparently being of a certain age, know there is MORE than an element of truth in those tales of the early days.http://www.pbm.com/~lindahl/real.programmers.html
PS: Feels also a little bit like back in the good old VIC 20 times.
sub formMeds_Show
...
arrayFormMedsTabOrder.Add( "formMedsHeader" )
arrayFormMedsTabOrder.Add( "labelMedsNDC" )
arrayFormMedsTabOrder.Add( "textMedsNDCLabeler" )
arrayFormMedsTabOrder.Add( "labelMedsNDCSep" )
arrayFormMedsTabOrder.Add( "textMedsNDCProduct" )
arrayFormMedsTabOrder.Add( "labelMedsProduct" )
arrayFormMedsTabOrder.Add( "textMedsProduct" )
arrayFormMedsTabOrder.Add( "btnMedsSearch" )
arrayFormMedsTabOrder.Add( "labelMedsGeneric" )
arrayFormMedsTabOrder.Add( "textMedsGeneric" )
arrayFormMedsTabOrder.Add( "btnMedsClear" )
arrayFormMedsTabOrder.Add( "labelMedsDose" )
arrayFormMedsTabOrder.Add( "textMedsDose" )
arrayFormMedsTabOrder.Add( "labelMedsRoute" )
arrayFormMedsTabOrder.Add( "comboMedsRoute" )
arrayFormMedsTabOrder.Add( "labelMedsFrequency" )
arrayFormMedsTabOrder.Add( "textMedsFrequency" )
arrayFormMedsTabOrder.Add( "labelMedsDiagnosis" )
arrayFormMedsTabOrder.Add( "textMedsDiagnosis" )
arrayFormMedsTabOrder.Add( "btnMedsDXSearch" )
arrayFormMedsTabOrder.Add( "btnMedsPrev" )
arrayFormMedsTabOrder.Add( "btnMedsNext" )
arrayFormMedsTabOrder.Add( "btnMedsMenu" )
setFormTabOrder( "formMeds" )
...
end sub
Sub setFormTabOrder( pArray )
ctl = "array" & pArray & "TabOrder"
For x = 0 To Control( ctl, ArrayList ).Count - 1
Control( Control( ctl, ArrayList ).Item( x ) ).BringToFront
Next
End Sub
Not really - I am sure that the array list will be in the correct order. I would try excluding from the list the form and labels as they cannot gain the focus so are not really in the tab order - see if that makes a difference.Anyone have any ideas?
arrayFormMedsTabOrder.Add( "textMedsNDCLabeler" )
arrayFormMedsTabOrder.Add( "textMedsNDCProduct" )
arrayFormMedsTabOrder.Add( "textMedsProduct" )
arrayFormMedsTabOrder.Add( "btnMedsSearch" )
arrayFormMedsTabOrder.Add( "textMedsGeneric" )
arrayFormMedsTabOrder.Add( "btnMedsClear" )
arrayFormMedsTabOrder.Add( "textMedsDose" )
arrayFormMedsTabOrder.Add( "comboMedsRoute" )
arrayFormMedsTabOrder.Add( "textMedsFrequency" )
arrayFormMedsTabOrder.Add( "textMedsDiagnosis" )
arrayFormMedsTabOrder.Add( "textMedsDiagnosisDesc" )
arrayFormMedsTabOrder.Add( "btnMedsDXSearch" )
arrayFormMedsTabOrder.Add( "btnMedsPrev" )
arrayFormMedsTabOrder.Add( "btnMedsNext" )
arrayFormMedsTabOrder.Add( "btnMedsMenu" )
TabOrder.New1(B4PObject(1),TabControlNames(),NumOfControls)
Sorry Cableguy - I DO understand the differences between tab order and z-order as is clear from my post #15. It IS the tab order that my little library sets. In fact it sets the TabIndex property for each control given to it in the order in which they are placed in the array and obviously works for me and Gary. It needs a library as this property is not available in B4PPC. Why do you think it is setting the z-order?Still I set back and was hopping to see what Agrahams aproch would bring, results wise, and as I espected, only the z-order gets changed
We use cookies and similar technologies for the following purposes:
Do you accept cookies and these technologies?
We use cookies and similar technologies for the following purposes:
Do you accept cookies and these technologies?