Páginas (2):    1 2
vuott   24-09-2020, 15:56
#11
" supongo que se puede llamar al Form_Close() del formulario principal desde cualquier otro formulario mediante una función pública o un evento creado ad-hoc. "

Exactamente.
En estos casos el Evento "Form_Close() " es muy util.
Última modificación: 24-09-2020, 15:57 por vuott.

« Los horizontes perdidos nunca regresan. » (F. Battiato, 1983)

« Las ondas nunca regresan. » (Genesis: Ripples, 1976)

« Vita non suavis esse potest, nec Mors amara. »  (...vuott)
jsbsan   24-09-2020, 21:16
#12
Cita:"entonces cierras la ventana principal de la aplicación y te quedan abiertas 3 o cuatro según el usuario las haya abiertos y queda desprolijo que tu programa este cerrado y queden ventanas ahí sin cerrar y ni te cuento si hay algún vídeo o audio ejecutándose o algún timer"

Os dejo un ejemplo de una forma de "recopilar" las ventanas que se abren y que cuando cierro "el formulario principal", se cierren tambien ellas:

 
Código:
' Gambas class file

Public ListaVentanas As New Variant[]

Public Sub Button1_Click()

    Dim ftmp As New Form1

    ftmp.show()

    ListaVentanas.add(ftmp)

End

Public Sub Button2_Click()

    Dim ftmp As New Form2

    ftmp.show()

    ListaVentanas.add(ftmp)

End

Public Sub ButtonCerrar_Click()

    Me.Close()

End

Public Sub Form_Close()

    Dim f As Variant

    ' 'cierro todo lo que hay abierto
    For Each f In ListaVentanas

        Try f.Close()
        'puede ser que alguna ventana ya no exista, por eso pongo TRY

    Next
    'fin del programa al cerrar el formulario principal (y automáticamente se cierra los formularios auxiliares)

End
Archivos adjuntos
.gz
recopiladorventanas-0.0.1.tar.gz (Tamaño: 11.76 KB Descargas: 1)
Última modificación: 25-09-2020, 12:16 por jguardon. Razón: etiquetas de código gambas
kokodrilo   25-09-2020, 14:56
#13
julio en eso pensaba como solución, no se si exacto como ese código pero... no se donde lo mencione, tener una variable publica en el formulario principal y añadir todos los formularios que no sean en modo showmodal, y al cerrar hacer un foreach.

voy a probar el código y después te cuento, gracias por el ejemplo

una pregunta julio, en vez de usar variant, no seria Windows[]

los formularios son ventanas no?
Última modificación: 25-09-2020, 15:08 por kokodrilo.

El tiempo de las manifestaciones caducó pero el boicot con auto sacrificio es el camino para derrotar al sistema.
vuott   25-09-2020, 18:28
#14
(25-09-2020, 14:56)kokodrilo escribió: os formularios son ventanas no?

Sì, pero porqué no usar un array de Form ?

« Los horizontes perdidos nunca regresan. » (F. Battiato, 1983)

« Las ondas nunca regresan. » (Genesis: Ripples, 1976)

« Vita non suavis esse potest, nec Mors amara. »  (...vuott)
jsbsan   25-09-2020, 18:28
#15
Kokodrilo:
Cita:en vez de usar variant, no seria Windows[]

los formularios son ventanas no?

Uso un array de variant[] es porque admite todo clase de objetos, (en este caso concreto son ventanas), pero puede ver otros casos que también te interese añadirles al array procesos o timer.

Saludos

'Nota:
Si son timer, tienes que cerrarlos con .stop (y no con .close())
kokodrilo   25-09-2020, 18:47
#16
si seria mas preciso, vuott

julio, si variant parecería lo mas acertado y escalable.
ya probé y anda bien, lo que tengo que añadir todos los formularios en su evento open, espero sea el correcto,

cree una variable global  VentanasAbiertas y al principio del evento open de cada formulario pongo VentanasAbiertas.Add(me)
y bueno en close el foreach.

'Nota:
Si son timer, tienes que cerrarlos con .stop (y no con .close())

si eso es obvio julio, ahí ya hay que recorrer el array identificar que tipo de objeto y ejecutar la accion.
Última modificación: 25-09-2020, 18:49 por kokodrilo.

El tiempo de las manifestaciones caducó pero el boicot con auto sacrificio es el camino para derrotar al sistema.
Páginas (2):    1 2
  
Usuarios navegando en este tema: 2 invitado(s)
Powered By MyBB, © 2002-2024 MyBB Group.
Made with by Curves UI.