tu es certain de ça ?Shared: Déclarable dans une procédure, accessible dans la procédure où elle a été déclarée et dans le code principal mais pas dans les autres procédures.
car là, ça fonctionne :
Code : Tout sélectionner
Procedure DefinirNombre()
Shared Nombre
Nombre = 10
ProcedureReturn nombre
EndProcedure
Procedure ChangerNombre(valeur)
Shared Nombre
Nombre + valeur
ProcedureReturn nombre
EndProcedure
Procedure ConnaitreNombre()
ProcedureReturn nombre
EndProcedure
Debug "devrait être 10 : " + DefinirNombre()
Debug "devrait être 15 : " + ChangerNombre(5)
Debug "devrait être 22 : " + ChangerNombre(7)
Debug "devrait être 22 : " + Nombre
Debug "devrait être 0 : " + ConnaitreNombre()
Shared: variable partagée, déclarable dans une procédure, accessible dans la procédure où elle a été déclarée, dans le code principal et dans les autres procédures où elle est déclarée.