Imports System.IO
Imports EgtUILib
Imports EgtWPFLib5

Public Class ModifyImagePanelVM
   Inherits VMBase

   Sub New()

   End Sub

   ' definizione comandi
   Private m_cmdModifyBtn As ICommand

   Public ReadOnly Property Modify_Command As ICommand
      Get
         If m_cmdModifyBtn Is Nothing Then
            m_cmdModifyBtn = New Command(AddressOf Modify)
         End If
         Return m_cmdModifyBtn
      End Get
   End Property

   Public Sub Modify(ByVal param As Object)
      Dim refImagePrevieV As New ImagePreviewV()
      refImagePrevieV.ShowDialog()
   End Sub

End Class