Mercurial > silverbladetech
comparison Glimpse/Model/BrokenBinding.vb @ 59:3591c26bd63e
MVVMLight added
author | Steven Hollidge <stevenhollidge@hotmail.com> |
---|---|
date | Sat, 21 Apr 2012 19:20:28 +0100 |
parents | |
children |
comparison
equal
deleted
inserted
replaced
58:241e2f22ed3c | 59:3591c26bd63e |
---|---|
1 | |
2 Public Class BrokenBinding | |
3 | |
4 #Region " Declarations " | |
5 | |
6 Private _strControlName As String = String.Empty | |
7 Private _strControlTypeName As String = String.Empty | |
8 Private _strPath As String = String.Empty | |
9 Private _strPropertyName As String = String.Empty | |
10 | |
11 #End Region | |
12 | |
13 #Region " Properties " | |
14 | |
15 Public ReadOnly Property ControlName() As String | |
16 Get | |
17 | |
18 If String.IsNullOrEmpty(_strControlName) Then | |
19 Return "(none)" | |
20 | |
21 Else | |
22 Return _strControlName | |
23 End If | |
24 | |
25 End Get | |
26 End Property | |
27 | |
28 Public ReadOnly Property ControlTypeName() As String | |
29 Get | |
30 Return _strControlTypeName | |
31 End Get | |
32 End Property | |
33 | |
34 Public ReadOnly Property Path() As String | |
35 Get | |
36 Return _strPath | |
37 End Get | |
38 End Property | |
39 | |
40 Public ReadOnly Property PropertyName() As String | |
41 Get | |
42 Return _strPropertyName | |
43 End Get | |
44 End Property | |
45 | |
46 #End Region | |
47 | |
48 #Region " Constructor " | |
49 | |
50 Public Sub New(ByVal strControlName As String, ByVal strControlTypeName As String, ByVal strPropertyName As String, ByVal strPath As String) | |
51 _strControlName = strControlName | |
52 _strControlTypeName = strControlTypeName | |
53 _strPropertyName = strPropertyName | |
54 _strPath = strPath | |
55 End Sub | |
56 | |
57 #End Region | |
58 | |
59 #Region " Methods " | |
60 | |
61 Public Overrides Function ToString() As String | |
62 Return String.Format("Control Name: {0}, Type: {1}, Property: {2}, Path: {3}", Me.ControlName, Me.ControlTypeName, Me.PropertyName, Me.Path) | |
63 End Function | |
64 | |
65 #End Region | |
66 | |
67 End Class |