Usando AScan() buscamos el primer control que sea distinto:
AScan( oDlg:aControls, { | oCtrl, n | oCtrl:bSetGet != nil .and. Eval( oCtrl:bSetGet ) != aInitValues[ n ] } ) != 0
un valor .T. significa que han habido cambios
↧