Hi Mike,

I'm confused. In wich event do you have code: InteractiveChange or OnMoveItem? Would it work if you remove the code?
Can you modify code below to demonstrate the problem?

PUBLIC oform1

oform1=NEWOBJECT("form1")
oform1.Show
RETURN

DEFINE CLASS form1 AS form


	Top = 0
	Left = 0
	DoCreate = .T.
	Caption = "Form1"
	Name = "Form1"


	ADD OBJECT list1 AS listbox WITH ;
		RowSourceType = 1, ;
		RowSource = "One,Two,Three, Four, Five, Six, Seven", ;
		Height = 217, ;
		Left = 12, ;
		MoverBars = .T., ;
		Top = 24, ;
		Width = 241, ;
		AutoHideScrollbar = 1, ;
		Name = "List1"

	PROCEDURE list1.OnMoveItem
		LPARAMETERS nSource, nShift, nCurrentIndex, nMoveBy
		DEBUGOUT PROGRAM(), nSource, nShift, nCurrentIndex, nMoveBy
	ENDPROC


	PROCEDURE list1.InteractiveChange
		DEBUGOUT PROGRAM()
	ENDPROC


ENDDEFINE

>
>Its the standard VFP listbox with MoverBars showing and the RowSource type is None. I'm using the list's AddListItem() method to populate it.
>
>Mike
>
>>>>
>>Are you refering to the standard ListBox with MoveBars=.T. or something else? If it's former, what is RowSource type?
>>
>>>
>>>I was wondering if you could help me with a related problem. I've got a mover list on a form. In the list's InteractiveChange event I put some custom code to set a flag that indicates something has changed (in order to prompt the user to save or throw away their changes).
>>>
>>>While this works, the issue that I'm having is that the list item being dragged with the mover button does not show while dragging. It will eventually appear at the new position, but, it just does not show while being dragged. I've tried putting a DODEFAULT(nSource, nShift, nCurrentIndex, nMoveBy) before and after my code but it does not help.
>>>
>>>Any idea what I could do to have it show while being moved?
>>>