Listbox dataSource and Enumerate()

Hi

Not a big point, but giving me an irritation.

The dataSource of a listbox is not properly recognised by the 
Enumerate() function.    Instead of giving "P" it is shown as
"U". This 
is true whether the dataSource is a field object or an array.

Try the code below.


Bruce Beacham


*****
ff = new form()
ff.lb = new listbox(ff)
ff.open()
inspect(ff.lb)      // dataSource is empty

aa = enumerate(ff.lb)
inspect(aa)        // dataSource is "U"

ff.d = new database("dbasesamples")
ff.q = new query([select * from ":dbasesamples:fish" f])
ff.lb.dataSource = ff.q.rowset.fields["name"]
inspect(ff.lb)         // dataSource is    '.rowset.fields["name"]'

aa = enumerate(ff.lb)
inspect(aa)              // dataSource is "U"
? ff.lb.dataSource      // object

ff.lb.dataSource = 'array {"A", "B", "C"}'
inspect(ff.lb)         // dataSource is   'array {"A", "B",
"C"}'

aa = enumerate(ff.lb)
inspect(aa)            // dataSource is still "U"

Hi Bruce. this was previously submitted as QAID 2401. I will put in a me 
too for you and re-submit.

Thanks, kathy

> Hi
> 
> Not a big point, but giving me an irritation.
> 
> The dataSource of a listbox is not properly recognised by the 
> Enumerate() function.    Instead of giving "P" it is shown as
"U". This 
> is true whether the dataSource is a field object or an array.
> 
> Try the code below.
> 
> 
> Bruce Beacham
> 
> 
> *****
> ff = new form()
> ff.lb = new listbox(ff)
> ff.open()
> inspect(ff.lb)      // dataSource is empty
> 
> aa = enumerate(ff.lb)
> inspect(aa)        // dataSource is "U"
> 
> ff.d = new database("dbasesamples")
> ff.q = new query([select * from ":dbasesamples:fish" f])
> ff.lb.dataSource = ff.q.rowset.fields["name"]
> inspect(ff.lb)         // dataSource is   
'.rowset.fields["name"]'
> 
> aa = enumerate(ff.lb)
> inspect(aa)              // dataSource is "U"
> ? ff.lb.dataSource      // object
> 
> ff.lb.dataSource = 'array {"A", "B", "C"}'
> inspect(ff.lb)         // dataSource is   'array {"A",
"B", "C"}'
> 
> aa = enumerate(ff.lb)
> inspect(aa)            // dataSource is still "U"
> 
> *****
> 

-- 
Thanks, Kathy

> Hi Bruce. this was previously submitted as QAID 2401. I will put in a me 
> too for you and re-submit.
> 
> Thanks, kathy
> 
On second thought. You submitted this in the first place, so I will 
simply re-submit. ;-)

Kathy Kolosky wrote:
>> Hi Bruce. this was previously submitted as QAID 2401. I will put in a
me 
>> too for you and re-submit.
>>
>> Thanks, kathy
>>
> On second thought. You submitted this in the first place, so I will 
> simply re-submit. ;-)

Ah!   Must have been when I was co-developing the innards of the 
kminspector.wfm process.

Thanks.