By: Kenneth

Kenneth — Wed, 24 Aug 2011 10:51:05 +0000

Thanks for the code, but I have only one thing: You are not applying the factory design pattern on the STORE classes – only the SOFTWARE class and that is a bit confusing and need to be addressed/mentioned in the text. Actually, I would apply the factory design pattern even on the STORE classes:

Public Function getStore(country As String) As CSoftwareStore
Select Case country
Case “USA”
Set getStore = New CUSASoftwareStore
Case Else
Set getStore = New CEUSoftwareStore
End Select
End Function

and then in the agent I could replace the “Dim storeEU” and “Dim storeUSA” with
Dim store As CSoftwareStore
Set store = getStore(“USA”)
Set sw = store.orderSoftware(“basic”)

or
Set store = getStore(“EU”)
Set sw = store.orderSoftware(“pro”)

With this approach, the implementation of the different stores are hidden which is one of the main reasons for using the factory design pattern.

Comments on: Design patterns – Part 4: Factory method pattern

By: Kenneth