Una Window puede comportarse como un dialogo?

[leandro]

Buenas noches para todos,

Es que estoy tratando de hacer una actualización en la aplicación, pero requiero hacer la validación del usuario antes de abrir la ventana principal de la aplicación, esto funciona super bien siempre y cuando sea un dialogo, pero si lo intento hacer con una window no funciona.

Es posible hacer que una window tome el comportamiento de un dialog, osea que pueda hacer la validación del usuario antes de abrir la ventana principal pero usando una window?

De antemano gracias....

Actualmente funciona asi:

Code: Select all

function main()
.....
.....
if validausuario()
 abreventanaprincipal()
endif
....
...
Return nil

Function validausuario()
Local lIngresa
DEFINE DIALOG oDlgCmes RESOURCE "ORINICI1"  //Si cambio este dialog por una window no funciona
....
....
ACTIVATE DIALOG oDlgCmes CENTER
Return lIngresa

Function abreventanaprincipal()
DEFINE WINDOW oWnd TITLE ttitu ICON "#8001"
.....
....
ACTIVATE WINDOW oWnd
Return nil
 

[Antonio Linares]

Leandro,

Prueba a deshabilitar la ventana:

oWnd:Disable()

una vez identificado:

oWnd:Enable()

[leandro]

Antonio muchas gracias por la respuesta.

Lo hice como me indicaste y funciono.

Solo que luego quite las instrucciones que me indicaste y aun así sigue funcionando. No se ahora cual sea la razón que funcione, sin esas instrucciones.

Algo extraño

[Antonio Linares]

Comprueba que el PRG se este compilando bien, sin errores

A veces la compilación falla (porque hay un error en el PRG) y lo que hacemos es ejecutar un EXE antiguo