Hi

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