Hola chicos. Quisiera saber si me pueden ayudar, me gustaria saber como hago para saber si existe un instancia previa de mi programa para que no se abra 2 veces o darle la opción de que el usuario decida si quiere abrir otra instancia..?

Ricardo Prieto escribió: [Ver mensaje]

......para que no se abra 2 veces...

De este asunto se habló tambien en el foro italiano:
http://www.gambas-it.org/smf/index.php?topic=2056

Vuott +1

===================
No podemos regresar

Gracas por el aporte voutt..
Les dejo un ejemplo.

Function VerificarInstaciaPrevia() As Boolean
Dim P As New Pointer[]

P = Desktop.FindWindow(Application.Title)

If P.Count > 0 Then
  Message.Info("Instancia previa abierta...! " & chr(13) & "Se cerrara la aplicación  " & P.Count, "Cerrar")

  Return True

Endif
  
End

Ricardo Prieto:

Creo que tu método tiene un problema... Si cambia el titulo de la ventana de la aplicación, no lo detectará.

Por ejemplo, yo suelo hacer, que en el título de mis aplicaciones, aparezcan los archivos que abro, con lo cual el titulo no es siempre el mismo.

Pienso que el método de Vuott, no tiene ese problema.

Saludos

Julio

===================
Blog personal
Web: SoloGambas seleccion de articulos dedicados a Gambas
Visita el Curso de Gambas3 ¡¡¡Gratuito!!!

Si tenes razón quizas si utilizo la propiedad name podria ser mejor..?
O si tenes otra alternativa aparte de la que utiliza voutt la podes ejemplificar..

Function VerificarInstaciaPrevia() As Boolean
Dim P As New Pointer[]

P = Desktop.FindWindow(Application.Name)

If P.Count > 0 Then
  Message.Info("Instancia previa abierta...! " & chr(13) & "Se cerrara la aplicación  " & P.Count, "Cerrar")

  Return True

Endif
  
End

Ricardo Prieto:

Citar:

O si tenes otra alternativa aparte de la que utiliza voutt la podes ejemplificar..

No, la de vuott me parece más correcta.

Citar:

P = Desktop.FindWindow(Application.Name)

No lo he probado, pero esta tambien me parece que es buena. Normalmente la aplicación (aunque hagas distintas versiones, no le cambias el nombre)

Saludos

===================
Blog personal
Web: SoloGambas seleccion de articulos dedicados a Gambas
Visita el Curso de Gambas3 ¡¡¡Gratuito!!!