Public Class SifonLadeManager
inherits MustInheritSifonLadeManager(Of ISifonLade)
'''
''' Initialiseren met een special laden engine.
'''
''' De special laden engine
Public Sub New(specialLadenEngine As ISpecialLadeEngine(Of ISifonLade))
MyBase.new(specialLadenEngine)
End Sub
'''
Protected Overrides Sub UpdateLaden(gewijzigdeLade As ISifonLade)
'Alle sifon laden overlopen.
For Each sifonLade In Laden
'Updaten met wijzigbare waarden.
sifonLade.BreedteSifonuitsparingZ1 = gewijzigdeLade.BreedteSifonuitsparingZ1
sifonLade.DiepteSifonuitsparingU1 = gewijzigdeLade.DiepteSifonuitsparingU1
sifonLade.PositieSifonuitsparingL = gewijzigdeLade.PositieSifonuitsparingL
Next
End Sub
'''
Public Overrides Sub BouwLaden()
Throw New NotImplementedException
End Sub
End Class