Disabled selected item in listbox

[sdmi]

In my program client client select item from list box. I use command button to move this item in textbox for further use. I tried to disable this porticular item, therefore client will not be able to select again. Code under command Move.click() look like this:
if thisform.lstInputfields.listcount != 0
for icount = 1 to gnFieldcount
if thisform.lstInputfields.selected(icount)
thisform.txtFullname.value =
thisform.lstInputfields.list (icount)
thisform.cmdBackfullname.enabled = .T.
thisform.cmdMovefullname.enabled = .F.
??????????????????????????????????????????????????
?? thisform.lstInputfields.enabled(icount)= .F. ??
??????????????????????????????????????????????????
endif
enfor
endif

 

[DSummZZZ]

When I have a list and a user selects an item, I get rid of it:

WITH THIS.PARENT
   STORE 1 TO indx

   &&... Use do while not for because list decreases 
   &&...   each time you remove an item
   DO WHILE indx <= .lbCustList.LISTCOUNT
      &&... if item selected, first add it to 
      &&...  another list or whatever, then remove
      IF .lbCustList.SELECTED(indx)   
         .lbCopyList.ADDLISTITEM(.lbCustList.listitem(.lbCustList.IndexToItemID(indx)))
         .lbCustList.REMOVELISTITEM(.lbcustlist.IndexToItemID(Indx))
      ELSE
         indx = indx + 1
      ENDIF
   ENDDO
ENDWITH

Dave S.

 

[R17]

hi sdmi,

or you can have the list rowsourcetype set to array, and disable your list by adding "\".

=)