Define Class NewButton As Container > SpecialEffect = 0 > > Procedure MouseDown > LParameters nButton, nShift, nXCoord, nYCoord > This.SpecialEffect = 1 > EndProc > > Procedure MouseUp > LParameters nButton, nShift, nXCoord, nYCoord > This.SpecialEffect = 0 > EndProc >EndDefine>When I create an object bassed on NewButton on my form and run it, I hold down the left button of the mouse over the NewButton object and don't change the specialeffect property.