PageRenderTime 11ms CodeModel.GetById 2ms app.highlight 7ms RepoModel.GetById 0ms app.codeStats 0ms

/Common/Settings/ListOfProfiles.vb

#
Visual Basic | 43 lines | 36 code | 7 blank | 0 comment | 0 complexity | 95970aab94bb4223bca330646547a7d6 MD5 | raw file
 1
 2Public Class ListOfProfiles
 3
 4    Property MovieCache         As String = ""
 5    Property TvCache            As String = ""
 6    Property CustomTvCache      As String = ""
 7    Property ActorCache         As String = ""
 8    Property MusicVideoCache    As String = ""
 9    Private _directorCache      As String = ""
10
11    Property DirectorCache  As String
12        Get
13            Return IIf(_directorCache="", Pref.applicationPath & "\Settings\directorcache.xml", _directorCache)
14        End Get
15
16        Set(value As String)
17            _directorCache=value
18        End Set
19    End Property
20
21    Property ProfileName    As String = ""
22    Property RegExList      As String = ""
23    Property Genres         As String = ""
24    Property Config         As String = ""
25    Property HomeMovieCache As String = ""
26    Property MovieSetCache  As String = ""
27
28    Public Sub Assign(profileTo As ListOfProfiles)
29        profileTo.ActorCache        = ActorCache
30        profileTo.DirectorCache     = DirectorCache
31        profileTo.Config            = Config
32        profileTo.MovieCache        = MovieCache
33        profileTo.ProfileName       = ProfileName
34        profileTo.RegExList         = RegExList
35        profileTo.Genres            = Genres
36        profileTo.TvCache           = TvCache
37        profileTo.CustomTvCache     = CustomTvCache
38        profileTo.ProfileName       = ProfileName
39        profileTo.MusicVideoCache   = MusicVideoCache
40        profileTo.MovieSetCache     = MovieSetCache
41    End Sub
42
43End Class