Xailer & OZ Software

Tengo un proceso en un Click de un TBtnBmp
//---------------------------------------------------------- --------------------
METHOD BtnPagarClick( oSender ) CLASS TPagosFP
Local nTotal
Local oPago
MemVar oSelf
aEval( ::aControls, {|v| v:lEnabled := .f. } ) //Se supone que se dbe ejecutar primero y se ejecuta hasta caso el final del proceso
oSelf := Self
nTotal := ::oCambio:value
::oCambio:value := Abs(nTotal)
If ( ::lCredito .Or. nTotal <= 0.0 )
Blah
Graba todos los datos y emite el ticket.
Blah
Pero, el problema es que primero realiza todo el proceso y al final me ejecuta el lEnabled := .f., cuando se puede mirar que es lo primero que deberia hacer.
Por que?
Saludos.
--
Ramón Zea
01.993.231-62-29
http://www.paginasprodigy.com/zeasoftware/
zeasoftware@prodigy.net.mx
zeasoftware@hotmail.com
ramonzea@yahoo.com
zeasoft.movil@hotmail.com
dirza_com@hotmail.com
--

Ramón,
si quieres deshabilitar todos los controles de un formulario, es más fácil
que uses ::lEnabled := .F. en vez del AEval().
Por cierto, el bloque AEval() se ejecuta siempre en el lugar que lo has
puesto, otra cosa es que el cambio no se refleje visualmente hasta que
toques algo que lo fuerce, salte un RequestState o el sistema repinte los
controles, pero ten por seguro que el AEval() sí­ se ejecuta en su sitio.
Saludos,
José Lalí­n