Cerrar ventana de diálogo ( Popup ) por código

SOLVED

Buenos días,

¿Alguien sabe cómo sería la forma de programar en 4GL para cerrar una ventana de Diálogo o Popup?

La idea sería cerrar la ventana tras pulsar un icono en la pantalla, por eso evitamos el uso del botón "OK" y "Salir"

Gracias. 

  • +1
    verified answer

    Hola Adrian:

    No estoy seguro si esto funciona en versiones syracuse (al menos en V6 sí funcionaba). En la acción de campo "Clic" del campo icono, hay que escribir algo así:

    Subprog CL_ZICON(VALEUR)
    Variable Char VALEUR()
    mkstat = 1024+7
    End

    El "1024" creo que se utiliza para manejar los botones de ventana desde un icono. Y "7" viene de la variable global GSTAESC. GSTAESC es la variable que maneja GSAISIE para controlar si se ha pulsado el botón "Esc" o se ha hecho clic en la X en la parte superior derecha de la ventana.

    No lo he probado y creo que no lo he usado nunca, pero lo tenía por ahí apuntado en mis librerías de útiles.

    Un saludo,

    Nacho.

  • 0 in reply to Nacho_Alferez

    Muchas gracias Nacho.

    Funciona perfectamente.