>Hi everybody,
>
>I'm not sure, how can I add items to the collection based on their TabOrder in the form.
>
Nadya,
Not sure if I understood you, but instead of adding the items based in their TabOrder in the form, you can order the collection, something like this:
Add a command button and put in the click()
loTabObjects = Createobject('Collection')
with loTabObjects as Collection
for each loObject in thisform.Objects
if Pemstatus(Evaluate("thisform." + loObject.Name), 'TabIndex', 5)
.add(loObject, Transform(loObject.TabIndex, '@L 999999999_'))
endif
endfor
.KeySort = 2
endwith
activate screen
for each loObject in loTabObjects
with loObject
? .Name, .TabIndex
endwith
endfor
Does this help?
"The five senses obstruct or deform the apprehension of reality."
Jorge L. Borges?
"Premature optimization is the root of all evil in programming."
Donald Knuth, repeating C. A. R. Hoare
"To die for a religion is easier than to live it absolutely"
Jorge L. Borges