Files
omagoffice/SelectTableWindow/SelectTableWindowV.xaml.vb
Dario Sassi 3c4cee8bd7 OmagOFFICE 1.9a2 :
- aggiunta gestione più tavole con relative sovratavole
- riportata correzione a movimento pezzi con ventose da OmagCUT.
2018-01-25 15:57:40 +00:00

21 lines
683 B
VB.net

Public Class SelectTableWindowV
Private WithEvents m_SelectTableWindowVM As SelectTableWindowVM
Public m_SelTable As Integer
Sub New(Owner As Window, SelectTableWindowVM As SelectTableWindowVM)
MyBase.New(Owner)
' This call is required by the designer.
InitializeComponent()
Me.DataContext = SelectTableWindowVM
' Assegno al riferimento locale al VM il VM preso dal DataContext
m_SelectTableWindowVM = SelectTableWindowVM
End Sub
Private Sub CloseWindow(DialogResult As Integer) Handles m_SelectTableWindowVM.m_CloseWindow
m_SelTable = DialogResult
Me.DialogResult = True
End Sub
End Class