Cerrar ventanas

Consultas, trucos, consejos. Todo sobre Clarion en todas sus versiones
Responder
hrlarzabal
Mensajes: 2
Registrado: Lun May 14, 2012 9:32 pm
Contactar:

Cerrar ventanas

Mensaje por hrlarzabal » Mié Abr 05, 2023 10:42 pm

FORO:

Tengo una ventana donde mediante una variable y un file look up leo un registro de un archivo. Según una condición de este archivo lleno diversos campos de la ventana.
Ahora por esa misma condición puede que tenga que abrir OTRA ventana. Y desde esta otra ventana si se da la primer condición vuelvo a la primer ventana.
El problema que al pasar de la primera a la segunda, la primera no se cierra y si tengo que volver de la segunda a la primera, quedan abiertas todas.

En el accept de la variable desde donde leo el archivo tengo este código:

IF Condicion=1
GLO:Numero=TOU:Numero
!!! Con esto trato de cerrar todas las ventanas abiertas
LOOP I# = 2 to 64
POST(Event:CloseWindow,,I#)
END
!!! Con esto hago que cuando abra la otra ventana la llene con el número obtenido
PRESSKEY(EnterKey)
Ventana2()
END

En la ventana 2 tengo practicamente el mismo código para volver

IF Condicion=2
GLO:Numero=TOU:Numero
!!! Con esto trato de cerrar todas las ventanas abiertas
LOOP I# = 2 to 64
POST(Event:CloseWindow,,I#)
END
!!! Con esto hago que cuando abra la otra ventana la llene con el número obtenido
PRESSKEY(EnterKey)
Ventana()
END

Finalmente en el FileLookUp de ambas ventanas tengo este código:

LOOP I# = 2 to 64
POST(Event:CloseWindow,,I#)
END

Esperando que se entienda el problema, agradezco desde ya cualquier tip.

MUCHAS GRACIAS!!!


Avatar de Usuario
Mauricio
Desarrollador de Clarion
Mensajes: 1125
Registrado: Dom Feb 06, 2011 9:34 am
Ubicación: España
Contactar:

Re: Cerrar ventanas

Mensaje por Mauricio » Mar Jul 18, 2023 4:16 am

Tendrías que enviarle un evento a las ventanas, procesar ese evento y hacer lo que se te antoje.
Mauricio, básicamente usando Clarion 6.3
www.tdcsoftware.com y www.clarioneros.com/blog

Responder

¿Quién está conectado?

Usuarios navegando por este Foro: No hay usuarios registrados visitando el Foro y 13 invitados