Imports System.Collections.ObjectModel
Imports System.Collections.Specialized
Imports System.ComponentModel
Imports System.Data
Imports System.Runtime.CompilerServices
Imports Prism.Mvvm
Imports RMG_Strategist

Public Class OverviewViewModel : Inherits BindableBase : Implements INotifyPropertyChanged, INotifyCollectionChanged

    Dim _OverviewTable As System.Data.DataTable
    Dim _OverviewCollection As ObservableCollection(Of Car)
    Dim _SelectedCar As Car

#Region "INotifyPropertyChanged Implementation"
    'Public Event PropertyChanged As PropertyChangedEventHandler Implements INotifyPropertyChanged.PropertyChanged
    Public Event CollectionChanged As NotifyCollectionChangedEventHandler Implements INotifyCollectionChanged.CollectionChanged

    'Private Sub NotifyPropertyChanged(<CallerMemberName()> Optional ByVal propertyName As String = Nothing)
    '    RaiseEvent PropertyChanged(Me, New PropertyChangedEventArgs(propertyName))
    'End Sub

    Private Sub NotifyCollectionChanged(e As NotifyCollectionChangedEventArgs)
        RaiseEvent CollectionChanged(Me, e)
    End Sub
#End Region

    Public Property OverviewTable As DataTable
        Get
            Return _OverviewTable
        End Get
        Set(value As DataTable)
            _OverviewTable = value
            RaisePropertyChanged("OverviewTable")
        End Set
    End Property

    Public Property OverviewCollection As ObservableCollection(Of Car)
        Get
            Return _OverviewCollection
        End Get
        Set(value As ObservableCollection(Of Car))
            _OverviewCollection = value
            RaisePropertyChanged("OverviewCollection")
        End Set
    End Property

    Public Property SelectedCar As Car
        Get
            Return _SelectedCar
        End Get
        Set(value As Car)
            _SelectedCar = value
            RaisePropertyChanged("SelectedCar")
        End Set
    End Property

    Public Sub New()
        OverviewTable = New DataTable()
        OverviewCollection = New ObservableCollection(Of Car)
        SelectedCar = New Car()
    End Sub

End Class