Karinha, el ejemplo anterior modificado. Espero que te sirva. //--------------------------------------------------------------------- Function ReIndexar(aAlias, lTodo)//local oDlg, oAnimate, oMeter1, oMeter2, oSay1, oSay2, oSay3, oBtnCancellocal oDlg, oAnimate, oMeter1, oMeter2, oSay1, oSay2...