Geoff,

I find multi-select grid to be much better interface than multi-select listbox.

>
>I am trying to set the selected items in a listbox upon entry to a form.
>
>In the Init event I have the following
>

>DODEFAULT()
>this.AddProperty('cWotypes')
>WITH this
>	.cWotypes = oIni.profilestring('WotsCont', 'User', 'Wotypes','')	&& load from ini
>	.cWotypes = IIF(EMPTY(.cWotypes), "[]",.cWotypes)
>
>	m.cWotypes = .cWotypes
>	FOR m.nCnt = 1 TO .ListCount
>		.Selected(m.nCnt) = INLIST(.List(m.nCnt,2), &cWotypes)
>	ENDFOR
>	.Refresh()
>ENDWITH

>
>This is setting the values fine but my listbox does not have any items highlighted when the form displays.
>
>I tried putting reload code in GotFocus but it only hightlighted it if I put NODEFAULT at the end without a DODEFAULT() at the beginning. Unfortunately this disables my control.
>
>What am I doing wrong.
>
>Regards
>Geoff Scott