Information générale
Catégorie:
Fonctions Windows API
>How do I eliminate the ability of a user to start multiple instances of my distributed foxpro program?
>Thanks
>Larry
This is my code
... Coming From VFUG NEWSLETTER ...
FUNCTION IsOpenApplication
**** Prévention de multiples appels de l'application
ENDIF
FUNCTION IsWindowOpen
LPARAMETER tcExeName
LOCAL lhWhandle,lIsYetOpen
DECLARE INTEGER FindWindow IN Win32Api STRING,STRING
lhWhandle=FindWindow(NULL,tcExeName)
IF lhWhandle#0
lIsYetOpen=.T.
ELSE
lIsYetOpen=.F.
ENDIF
RETURN lIsYetOpen
Hope this help
Michel
Précédent
Répondre
Voir le fil de ce thread
Voir le fil de ce thread à partir de ce message seulement
Voir tous les messages de ce thread
Voir tous les messages de ce thread à partir de ce message seulement