Progress - Cerrar Ventana desde otra

 
Vista:

Cerrar Ventana desde otra

Publicado por Afrika (48 intervenciones) el 02/04/2009 17:07:06
Muy buenas tardes y saludos cordiales.

Necesito saber como hago para cerrar una ventana a travéz de otra.

Tengo tres ventanas, la primera llama a la segunda y la segunda a la tercera. Necesito que al cerrar la segunda, la primera ventana también cierre. La primera y la segunda ventana comparten una varibale, la tercera no.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Cerrar Ventana desde otra

Publicado por Rayne Flores (9 intervenciones) el 07/04/2009 01:48:49
La idea es que le pases la variable compartida como Shared y asi como los abres los cierras pasandole la variable compartida con la instruccion APPLY-CLOSE:U TO "Variable o nombre de programa"

Espero te sirva

Saludos
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Cerrar Ventana desde otra

Publicado por Afrika (48 intervenciones) el 13/04/2009 16:40:03
Pero hago esa instrucción en la ventana secundaria, es decir, que en la ventana secundaria coloco (en el CHOOSE):

APPLY "CLOSE":U TO VeMa0280.w. ?????

Creo que si coloco el nombre del programa o el de la variable me dará error.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Cerrar Ventana desde otra

Publicado por jfcordaz (22 intervenciones) el 28/04/2009 18:07:48
prueba con:

quit.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Cerrar Ventana desde otra

Publicado por Leandro Simeoni (2 intervenciones) el 30/04/2009 15:38:14
Tenes que correr un procedimiento en la ventana que queres cerrar, desde la que la cierra.

Pasandolo en limpio, si desde la ventana 1 queres cerrar la ventana 2 tenes que tener lo siguiente:

ventana1.w

/*DEFINICIONES*/
DEFINE NEW SHARED VARIABLE vhandle AS HANDLE.
..............

/* TRIGGERS */

ON "CHOOSE" OF button-cerrar DO:
IF vhandle <> ? THEN RUN cerrarventana IN vhandle.
END.
..................
/*MAIN BLOCK*/

..................


ventana2.w
DEFINE NEW SHARED VARIABLE vhandle AS HANDLE.
..............
/* TRIGGERS */
..................
/*MAIN BLOCK*/

..................

PROCEDURE cerrarventana:
APPLY "CLOSE" TO THIS-PROCEDURE.
END PROCEDURE.

Espero haber sido de ayuda.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar