>>Hi,
>>
>>I have a listbox, populated with an array: Thisform.aNames
>>The list is restricted to the first 10 elements only so NumberOfElements is set 10
>>The array is constructed in myForm with aNames[10,2]
>>
>>and populated with a select:

Select naw.fullname, naw.ID from NAW where  substring(fullname,1) = ? m.lcLetter into array aNames[10.2]

>>this works fine, however, when there is not enough data to populate 10 fields the remaing are shown in the listbox as .F., how should I change to avoid this, prefer to show [ ] (nothing)
>
>Honestly I don't understand how that really works in the first place. I just tested thinking I might be wrong but that kind of syntax is giving me error ("SQL: Statement is invalid"). You can't really specify the array size, can you?
>Whatever the initial size of an array is, after the select statement it would be [selected rows count, columns count].
>
>

>Local array laCheck1[300,100], laCheck2[1]
>Select * from (_samples+'data\customer') into array laCheck1
>Select * from (_samples+'data\customer') into array laCheck2
>
>? Alen(laCheck1,1), Alen(laCheck1,2)
>? Alen(laCheck2,1), Alen(laCheck2,2)
>

>
>The only exception to this is when select doesn't return any rows. Then the array's original size and values ae preserved.
>
>You could do a select into array with top to limit to 10 and then use _Tally to set the NumberOfElements.
>
>My preference would be to use a RowSourceType of 3-SQL and RowSource:
>
>

>Select top 10 fullname, ID from NAW where  fullname like ?m.lcLetter + '%' order by 1 into cursor crsMyNames
>

>
>Example:
>
>

>Select * From (_samples+"data\customer") Into Cursor NAW nofilter
>
>Public oForm
>oForm = Createobject('MyForm')
>oForm.Show()
>
>Define Class MyForm As Form
>	Add Object myList As ListBox With Top = 10, Left=10, Height = 200
>
>	Procedure myList.Init
>		Local lcLetter
>		lcLetter = 'B'
>
>		This.RowSourceType=3
>		TEXT to this.RowSource pretext 1+2+4+8 noshow
>Select top 10 Company, Cust_id
>from NAW
>where Company like ?m.lcLetter + '%'
>order by 1
>into cursor crsMyNames
>		ENDTEXT
>
>	Endproc
>Enddefine
>

>
>Using SQL rowsource's advantages come for free then (such as accessing the ID field -typed- simply by using alias.Id).

Cetin,
There is indeed an important error in my code:

Select naw.fullname, naw.ID from NAW where  substring(fullname,1) = ? m.lcLetter into array aNames[10.2]

it should read:
and populated with a select:

Select naw.fullname, naw.ID from NAW where  substring(fullname,1) = ? m.lcLetter into array aNames

will now proceed however with your suggested cursor approach.
Thanks and regards,
Koen