Files
egtstone3d/Application.xaml.vb
Demetrio Cassarino f70eba5633 riattivato splashscreen
2025-02-20 17:10:35 +01:00

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