СдутыйШарикВопрос – когда клиент обратиться к фабричному методу, определенному в глобал-классе – для него будет создан новый экземпляр, или система сообразит обратиться к закешированному в модуле, содержащем Main ? Будет создан новый :(
По поводу фабрики классов - хороший подход, нормальный. Для того, чтобы и внутри и вне библиотеки был единый (по крайней мере внешне) подход к работе с ф-кой классов могу предложить следующее (возможно это вариация на тему того, что вы обозначили как "
«теневой» стандартный модуль, на одноименные функции которого будут полагаться «фабричные» методы GlobalMultiUse – класса.
"):
Пусть есть класс-фабрика классов ClassFactory. Instancing у нее (внимание!) PublicNotCreatable, т.е. ее нельзя создать извне библиотеки (и это хорошо)
В MainModule пишем
1.
2.
3.
4.
Public Factory As ClassFactory
Sub Main()
Set Factory = New ClassFactory 'Теперь у нас есть экземпляр ф-ки классов, к которому можно обратится внутри библиотеки
End Sub
Создаем новый класс ClassFactorySupplier. Instancing - GlobalMultyUse. В нем пишем:
1.
2.
3.
4.
5.
6.
'Именно к этому свойству будет доступ извне библиотеки.
'Одновременно это решит проблему с одним экземпляром ClassFactory
Public Property Get Factory () As ClassFactory
Set Factory = MainModile.Factory
End Property
Т.о. разработчики и внутри и вне библиотеки привыкнут писать для получения экземпляра какого-либо класса
1.
dim a as Sample
set a = Factory.GetInstanace
Только внутри библиотеки это будет доступ к Public переменной из MainModul-я
А вне библиотеки - к свойству GlobalMultyUse класса, хотя экземпляр ClassFactory будет одним и тем же
