Bonjour,
Il y a quelques temps j'ai été confronté au problème du singleton en VB6.
Il s'agit d'une classe dont on souhaite qu'il n'existe qu'une seule instance.
Ne pouvant créer de réelles classes singleton (pas de variables statiques
partagées entre les différentes instances d'une classe) j'ai emprunté une méthode
trouvée sur un autre site.
Cela consiste à créer une classe "Singleton" de type "Non Creatable" et d'accéder à cette classe
par une autre classe "SingletonWrapper" de la même librairie. Le "constructeur" de la classe
singleton est une procédure public contenue dans un module partagé par ces deux classes. L'instance
de la classe singleton est sauvegardée dans une variable privée du module.
Je vous joins le modèle d'étude que je me suis fait au démarrage.
Pour les puristes, cette source n'a pas la prétention d'être celle d'un vrai singleton que l'on purrait avoir en .NET par exemple.