Imports Microsoft.Practices.Unity
 
Class Application
    Protected _container As IUnityContainer
 
    ' Ereignisse auf Anwendungsebene wie Startup, Exit und 
    ' DispatcherUnhandledException
    ' können in dieser Datei verarbeitet werden.
    Protected Overrides Sub OnStartup(ByVal e As _
      System.Windows.StartupEventArgs)
        MyBase.OnStartup(e)
       _container = InitializeContainer()
        Dim _mainform As MainWindow = _container.Resolve(Of MainWindow)()
        _mainform.Show()
    End Sub
 
    Private Function InitializeContainer() As IUnityContainer
        Dim MAP As New UnityContainer
        MAP.RegisterInstance(Of IClassSettings)(New ClassSettings)
        Return MAP
    End Function
 
End Class

Jedes Programm,
in das sich ein Fehler einschleichen kann,wird auch einen enthalten.

Beitrag wurde zuletzt am 02.06.10 um 21:51:47 editiert.