Comment faire en sorte qu'il y ai qu'une seul instance de mon programme

Bonjour,

J'aimerai faire en sorte qu'il n'y ai qu'une seul instance de mon programme qui soi exécutée !

Comment puis-je faire ?

Voilà la version Simple mais qui peut être contournée ;)

If App.PrevInstance Then
'Prog déjà chargé
end if


WebMaster


-------------------------------
Réponse au message :
-------------------------------


Bonjour,

J'aimerai faire en sorte qu'il n'y ai qu'une seul instance de mon programme qui soi exécutée !

Comment puis-je faire ?

Et comment pourrais je aire pour uttiliser une commande similaire sur une application éxterrieure (ex:Paint) pour ne le lancer que s'il ne l'est pas.



-------------------------------
Réponse au message :
-------------------------------

Voilà la version Simple mais qui peut être contournée ;)

If App.PrevInstance Then
'Prog déjà chargé
end if


WebMaster


-------------------------------
Réponse au message :
-------------------------------


Bonjour,

J'aimerai faire en sorte qu'il n'y ai qu'une seul instance de mon programme qui soi exécutée !

Comment puis-je faire ?

A mon avis tu dois utiliser :

Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long

-= PeekEpic =-

-------------------------------
Réponse au message :
-------------------------------

Et comment pourrais je aire pour uttiliser une commande similaire sur une application éxterrieure (ex:Paint) pour ne le lancer que s'il ne l'est pas.



-------------------------------
Réponse au message :
-------------------------------

Voilà la version Simple mais qui peut être contournée ;)

If App.PrevInstance Then
'Prog déjà chargé
end if


WebMaster


-------------------------------
Réponse au message :
-------------------------------


Bonjour,

J'aimerai faire en sorte qu'il n'y ai qu'une seul instance de mon programme qui soi exécutée !

Comment puis-je faire ?

Slut,

Et ?
Puis comment tu utiliuse l'API ?

>>> Bonne prog et bon hack !!!



-------------------------------
Réponse au message :
-------------------------------

A mon avis tu dois utiliser :

Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long

-= PeekEpic =-

-------------------------------
Réponse au message :
-------------------------------

Et comment pourrais je aire pour uttiliser une commande similaire sur une application éxterrieure (ex:Paint) pour ne le lancer que s'il ne l'est pas.



-------------------------------
Réponse au message :
-------------------------------

Voilà la version Simple mais qui peut être contournée ;)

If App.PrevInstance Then
'Prog déjà chargé
end if


WebMaster


-------------------------------
Réponse au message :
-------------------------------


Bonjour,

J'aimerai faire en sorte qu'il n'y ai qu'une seul instance de mon programme qui soi exécutée !

Comment puis-je faire ?

If (FindWindow("MSPaintApp", vbNullString) <> 0) Then
' MsPaint est lancé
Else
' MsPaint n'est pas lancé, tu peux le lancer
End IF

-= PeekEpic =-