"singleton" vb6

Description

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.

Conclusion :


Toutes les idées pour améliorer cette source sont les bienvenues.

J'essayerai de vous fournir prochainement un exemple concret.

++

Moustachu

Codes Sources

A voir également

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.