1: Imports Microsoft.TeamFoundation.WorkItemTracking.Client
2: Imports Microsoft.TeamFoundation.WorkItemTracking.Controls
3: 'Imports Microsoft.VisualStudio.TeamFoundation.WorkItemTracking
4:
5:
6: Public Class WitCustomControlBase(Of TWitWpfCustomControl As {New, UIElement, IWorkItemControl})
7: Implements IWorkItemControl
8:
9: #Region " IWorkItemControl "
10:
11: Public Event AfterUpdateDatasource(ByVal sender As Object, ByVal e As System.EventArgs) Implements Microsoft.TeamFoundation.WorkItemTracking.Controls.IWorkItemControl.AfterUpdateDatasource
12: Public Event BeforeUpdateDatasource(ByVal sender As Object, ByVal e As System.EventArgs) Implements Microsoft.TeamFoundation.WorkItemTracking.Controls.IWorkItemControl.BeforeUpdateDatasource
13:
14: Public Property [ReadOnly]() As Boolean Implements Microsoft.TeamFoundation.WorkItemTracking.Controls.IWorkItemControl.ReadOnly
15: Get
16: Return Me.uxWitWpfCustomControl.[ReadOnly]
17: End Get
18: Set(ByVal value As Boolean)
19: Me.uxWitWpfCustomControl.[ReadOnly] = value
20: End Set
21: End Property
22:
23: Public Sub SetSite(ByVal serviceProvider As System.IServiceProvider) Implements Microsoft.TeamFoundation.WorkItemTracking.Controls.IWorkItemControl.SetSite
24: Me.uxWitWpfCustomControl.SetSite(serviceProvider)
25: End Sub
26:
27: Public Property WorkItemDatasource() As Object Implements Microsoft.TeamFoundation.WorkItemTracking.Controls.IWorkItemControl.WorkItemDatasource
28: Get
29: Return Me.uxWitWpfCustomControl.WorkItemDatasource
30: End Get
31: Set(ByVal value As Object)
32: Me.uxWitWpfCustomControl.WorkItemDatasource = value
33: End Set
34: End Property
35:
36: Public Property WorkItemFieldName() As String Implements Microsoft.TeamFoundation.WorkItemTracking.Controls.IWorkItemControl.WorkItemFieldName
37: Get
38: Return Me.uxWitWpfCustomControl.WorkItemFieldName
39: End Get
40: Set(ByVal value As String)
41: Me.uxWitWpfCustomControl.WorkItemFieldName = value
42: End Set
43: End Property
44:
45: Public Property Properties() As System.Collections.Specialized.StringDictionary Implements Microsoft.TeamFoundation.WorkItemTracking.Controls.IWorkItemControl.Properties
46: Get
47: Return Me.uxWitWpfCustomControl.Properties
48: End Get
49: Set(ByVal value As System.Collections.Specialized.StringDictionary)
50: Me.uxWitWpfCustomControl.Properties = value
51: End Set
52: End Property
53:
54: Public Sub Clear() Implements Microsoft.TeamFoundation.WorkItemTracking.Controls.IWorkItemControl.Clear
55: Me.uxWitWpfCustomControl.Clear()
56: End Sub
57:
58: Public Sub FlushToDatasource() Implements Microsoft.TeamFoundation.WorkItemTracking.Controls.IWorkItemControl.FlushToDatasource
59: Me.uxWitWpfCustomControl.FlushToDatasource()
60: End Sub
61:
62: Public Sub InvalidateDatasource() Implements Microsoft.TeamFoundation.WorkItemTracking.Controls.IWorkItemControl.InvalidateDatasource
63: Me.uxWitWpfCustomControl.InvalidateDatasource()
64: End Sub
65:
66: #End Region
67:
68: Private Sub uxWitCustomControl_AfterUpdateDatasource(ByVal sender As Object, ByVal e As System.EventArgs) Handles uxWitWpfCustomControl.AfterUpdateDatasource
69: RaiseEvent AfterUpdateDatasource(sender, e)
70: End Sub
71:
72: Private Sub uxWitCustomControl_BeforeUpdateDatasource(ByVal sender As Object, ByVal e As System.EventArgs) Handles uxWitWpfCustomControl.BeforeUpdateDatasource
73: RaiseEvent BeforeUpdateDatasource(sender, e)
74: End Sub
75:
76: End Class