Jang,
>I have this list boxes controls in my form that
>I copied from the moverlists class in "Solution"
>of VFP6.0. I have the following 2 problems when
>moving items between the list boxes.
>
>1. It seems I can only display multi columns for
> the two list boxes by setting RowSourceType
> to 2 or above. Setting RowSourceType to 0
> or 1 makes the listbox to display only 1 column.
> Since I need to clear the listboxes often so
> I'd prefer to set RowSourcetype=0. If I do that
> is it still possible to set them to display
> multi columns?Here's how you can create multicolumn Listbox with RowSourceType=0.
WITH Thisform.List1
.ColumnCount = 3
.ColumnWidths = "50,100, 100"
.AddItem( 'One' )
.List[.NewIndex, 2] = 'OneColumn 2'
.List[.NewIndex, 3] = 'OneColimn 3'
.AddItem( 'Two' )
.List[.NewIndex, 2] = 'TwoColumn 2'
.List[.NewIndex, 3] = 'TwoColimn 3'
.AddItem( 'Three' )
.List[.NewIndex, 2] = 'ThreeColumn 2'
.List[.NewIndex, 3] = 'ThreeColimn 3'
ENDWITH
2. If I specified RowSourceType to 6 for both
listboxes, The code
SCAN
List.AddItem(table.field)
ENDSCAN
fills both (source and destination) boxes
instead of only the source listbox. Anyone
knows why I am doing wrong here?The AddItem() is only applicable for the RowSourceType 0 and 1. With the RowSourceType=6 the RowSource should be in the format 'TableAlias.Field1, Field2, Field3, ...'.
--sb--