TMessageBox . 1.3b

[zeasoftware]

Tengo una funcion:
WITH OBJECT oMessageBox1 := TMessageBox():New()
:cTitle := cTitle
:cText := cText
:nStyle := mbYESNO
:oIcon := "icoMSGQuestion"
:aButtons := { "&Si", "&No" }
:Create()
:Run()
END
en la 1.3a usaba:
Return ( oMessageBox:Run() == 1 )
y funcionaba, ahora, no me funcionaba, pero lei la documentacion por lo que lo cambie a:

Return ( oMessageBox:nResult == mrOK )
Pero... nResult regresa con valor de 6, y mrOK es 1
esto por que?
Gracias.
--
Ramón Zea
01.993.194.14.27
ramonzea@yahoo.com
zeasoftware@hotmail.com
zeasoft@prodigy.net.mx
zeasoft.movil@hotmail.com
zeasoft@prodigy.net.mx
http://www.paginasprodigy.com/zeasoft/
visita mi "venta de garage"
--

[jfgimenez]

Ramón,
> :nStyle := mbYESNO
Al ser el estilo mbYESNO, los valores posibles de retorno son mrYES y mrNO.
--
Un saludo,
José F. Giménez
http://www.xailer.com
http://www.xailer.info