Hello All

I have 2 listboxes, like the mover sample

the listbox in question is holding 710 vars a one-dimensional array

when the form is first ran not all the vars are shown in the listbox (about 700 vars), after "moving" double clicking one item from the incomplete list box to the listbox (not in question) all the vars are shown in the listbox (709 vars)

here is the mover code
thisform.list2.dblclick

IF ALEN(ga_source) < 10 (the other listbox can only go up to 10 items)
	SET TALK OFF
	=ADEL(ga_list,(THIS.LISTINDEX))
	DIMENSION ga_list(ALEN(ga_list)-1)
	THIS.NUMBEROFELEMENTS = ALEN(ga_list)
	IF ALEN(ga_source) = 1 AND ga_source[1] = 'None'
		ga_source[alen(ga_source)] = pc_list
	ELSE
		DIMENSION ga_source(ALEN(ga_source)+1)
		ga_source[alen(ga_source)] = pc_list
		THISFORM.list1.NUMBEROFELEMENTS = ALEN(ga_source)
	ENDIF
	=ASORT(ga_source)
ELSE
	MsgBoxTmr("Maximum number of related forms reached!",'(WEIA) Limit Error',"OK", "!", 1, 10)
	RETURN
ENDIF
THISFORM.REFRESH



any ideas?? more info needed??

Thanks

Stephen McLaughlin
"Sexy Steve Valenteno", "Blastmaster"
stephenmclaughlin@gmail.com