-
Notifications
You must be signed in to change notification settings - Fork 0
/
MyCustomDrawArgs.vb
58 lines (50 loc) · 1.19 KB
/
MyCustomDrawArgs.vb
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
Imports Microsoft.VisualBasic
Imports System
Imports System.Collections.Generic
Imports System.ComponentModel
Imports System.Data
Imports System.Drawing
Imports System.Linq
Imports System.Text
Imports System.Windows.Forms
Imports DevExpress.XtraBars.Docking.Paint
Imports DevExpress.XtraBars.Styles
Imports DevExpress.Utils
Imports DevExpress.XtraBars.Docking
Namespace WindowsFormsApplication1
Public Delegate Sub CustomDrawEventHandler(ByVal sender As Object, ByVal e As MyCustomDrawArgs)
Public Class MyCustomDrawArgs
Public Sub New(ByVal args As Object, ByVal panel As DockPanel)
_Args = args
_Panel = panel
Handled = False
End Sub
Private _Handled As Boolean
Public Property Handled() As Boolean
Get
Return _Handled
End Get
Set(ByVal value As Boolean)
_Handled = value
End Set
End Property
Private _Args As Object
Public Property Args() As Object
Get
Return _Args
End Get
Set(ByVal value As Object)
_Args = value
End Set
End Property
Private _Panel As DockPanel
Public Property Panel() As DockPanel
Get
Return _Panel
End Get
Set(ByVal value As DockPanel)
_Panel = value
End Set
End Property
End Class
End Namespace