1 | PUBLIC hLock AS Stream '<------------------- Déclaration du fichier |
1 2 3 4 5 6 | TRY hLock = LOCK User.home & "/." & Application.Title & "-" & Application.Version & "-lock" ' le fichier sera caché, c'est le point après "/" qui l'indique. |
1 2 3 4 | IF NOT IsNull(hLock) THEN |