36 lines
1.0 KiB
VB.net
36 lines
1.0 KiB
VB.net
Class Application
|
|
|
|
' Gli eventi a livello di applicazione, ad esempio Startup, Exit e DispatcherUnhandledException,
|
|
' possono essere gestiti in questo file.
|
|
|
|
#Region "FIELDS & PROPERTIES"
|
|
|
|
#End Region ' Fields & Properties
|
|
|
|
#Region "METHODS"
|
|
|
|
Protected Overrides Sub OnStartup(e As StartupEventArgs)
|
|
MyBase.OnStartup(e)
|
|
ShutdownMode = System.Windows.ShutdownMode.OnMainWindowClose
|
|
If e.Args.Count = 0 Then
|
|
' creo finestra SplashScreen
|
|
Dim SplashScreen As New SplashScreenV
|
|
Me.MainWindow = SplashScreen
|
|
Me.MainWindow.Show()
|
|
Map.SetRefSplashScreen(SplashScreen)
|
|
End If
|
|
' Creo la View principale
|
|
Me.MainWindow = New MainWindowV
|
|
' Mostro la View principale
|
|
Me.MainWindow.Show()
|
|
' inizializzo finestra interfaccia
|
|
Dim m_SecondaryWindowWnd = New SecondaryWindowV(Application.Current.MainWindow) With {
|
|
.Owner = Me.MainWindow
|
|
}
|
|
m_SecondaryWindowWnd.Show()
|
|
End Sub
|
|
|
|
#End Region ' Methods
|
|
|
|
End Class
|