d24641a0b2
- Migliorie varie.
27 lines
1.2 KiB
VB.net
27 lines
1.2 KiB
VB.net
Imports EgtWPFLib5
|
|
|
|
Public Class BaseWindowView
|
|
Inherits EgtPanelWindow
|
|
|
|
Sub New()
|
|
|
|
' This call is required by the designer.
|
|
InitializeComponent()
|
|
|
|
' Add any initialization after the InitializeComponent() call.
|
|
' Set this as owned by MainWindow, when this one is rendered
|
|
Application.Msn.Register(Application.MAINWINDOW_CONTENTRENDERED, Sub()
|
|
Me.Owner = Application.Current.MainWindow
|
|
Me.Focus()
|
|
End Sub)
|
|
Application.Msn.Register(Application.MAINWINDOW_ACTIVATED, Sub()
|
|
'Me.Topmost = True
|
|
End Sub)
|
|
Application.Msn.Register(Application.MAINWINDOW_DEACTIVATED, Sub()
|
|
'Me.Topmost = False
|
|
End Sub)
|
|
End Sub
|
|
|
|
End Class
|
|
|