FiveTech Support Forums

Hola Muchachos,
Normalmente para salir de un dialogo presiono el boton correspondiente en mi barra de herramientas, Cuando hago esto valido ciertos detalles en una funcion "salir()". Lo que no se, es como hacer que mi programa vaya a esta funcion cuando doy click en el boton cerrar[x] que esta en la parte superior derecho del dialogo junto a maximizar o minimizar, aqui las lineas de mi programa...

DEFINE WINDOW oWndPar MDICHILD OF oWndMain TITLE "Parametros del Sistema" STYLE NOR(WS_OVERLAPPED + WS_CAPTION + WS_SYSMENU + WS_MINIMIZEBOX )
DEFINE DIALOG oDlg RESOURCE "Fld_Par0" OF oWndPar
...
...
ACTIVATE DIALOG oDlg CENTER NOWAIT ON INIT ( oDlg:move(0,0), CURSORARROW() ) VALID ( iif(Salir(), (oWndPar:END(), .T.), .F.) )
ACTIVATE WINDOW oWndPar ON INIT ( oWndPar:SetSize( oDlg:nWidth+1, oDlg:nHeight+14 ), oWndPar:CENTER() )

Alguien por favor me puede ayudar
Gracias de antemano

William Chavez Noriega
Lima - Peru

William

Tenes que colocar oWndPar:bValid:={ || salir() }

Saludos

Adhemar

acuellar wrote:William

Tenes que colocar oWndPar:={ || salir() }

Saludos

Adhemar

Despues de haber ingresado al programa.

Por Ej: si te pide clave y es correcta, entonces coloca la línea.

Saludos

Adhemar

Muchas Gracias Adhemar...