Clipper/FiveWin - desactivar boton Cerrar en un Define Windows

Hola compañeros:

Tengo un "define windows" donde en el barra de títulos están los 3 tipicos botones de windows (minimizar, maximizar y cerrar). Quiero que el usuario cuando salga del programa NO lo pueda hacer desde el boton cerrar de la barra de títulos sino que lo haga desde un buttons que inserté en el menu.

es decir, ¿ Como puedo desactivar el boton "cerrar" de la barra de títulos de un Define Windows?

Mil gracias
Lorenzo.

Simplemente al activar la ventana pones un valid:

ACTIVATE WINDOW oWnd ;
VALID MsgYesNo( "¿Quiere salir?" )

Si quieres que antes de salir, haga una serie de cosas, al principio, le pones lSalir:= .f. y en el valid le pones un VALID con If(lSali .....)

Buenas Alvaro:

Me has resuelto una pregunta que iba a hacer. Realizar algo cuando cierras ventana. Pero con tu explicacion no me sale. ¿Puedes detallarmela?

Yo hago:

ACTIVATE DIALOG oDlg CENTERED ;
VALID MsgYesNo( "¿Quiere salir?" ) ;
ON INIT TapaCobro(@oTotal,@nTotal,@oSaldo,oDlg)

y quiero que al salir pase por :

LimpiaCobro(@nCobra,oDlg)

Gracias de antemano por tu ayuda

Amigo prueba lo siguiente

DEFINE DIALOG .........
.....
....
....

ACTIVATE DIALOG oDlg CENTERED ;
VALID MsgYesNo( "¿Quiere salir?" ) ;
ON INIT TapaCobro(@oTotal,@nTotal,@oSaldo,oDlg)

//Solo hay que colocarlos desdepues de activar la ventana
//en el momento que salgas se ejecuta el procedimiento que sigue.

LimpiaCobro(@nCobra,oDlg)

//no hay que hacer nada mas..

Espero te sirva.

LEANDRO ALFONSO
Bogotá (Colombia)

Mil gracias Leandro, me ha sido de muchisima ayuda

Hola

Tengo un ciber y todos los usuarios me apagan las maquinas necesito desacticar los botones de apagar cerrar secion etc.

Muchas gracias por la pagina web