WITH THIS.Parent.lstModelFee lnTotFees = .ListCount lnFeeSelected = 1 FOR lnCurFee = 1 TO lnTotFees IF .Selected[ lnFeeSelected ] lnNodeId = VAL(.List[ lnFeeSelected, 4 ]) THISFORM.mpRemoveFromList ( lnNodeId ) .RemoveItem( lnFeeSelected ) ELSE lnFeeSelected = lnFeeSelected + 1 ENDIF ENDFOR ENDWITH THIS.Enabled = .F.