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','')
> .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
--sb--