-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathMyLayoutSkinPaintStyle.vb
37 lines (32 loc) · 1.38 KB
/
MyLayoutSkinPaintStyle.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
' Developer Express Code Central Example:
' How to place controls in a LayoutControl's tabbed group header
'
' By default, it is not possible to place any control within a tabbed group
' header, because the LayoutControl's layout can be widely customized (groups can
' be moved and hidden, their direction can be changed). However, you can emulate
' controls by custom drawing them. This example demonstrates how to draw a
' CheckBox and ProgressBar in headers.
'
' You can find sample updates and versions for different programming languages here:
' http://www.devexpress.com/example=E2811
Imports System.ComponentModel
Imports System.Drawing
Imports DevExpress.XtraLayout.Registrator
Imports DevExpress.XtraLayout
Imports DevExpress.LookAndFeel
Imports DevExpress.XtraLayout.Painting
Imports DevExpress.XtraLayout.ViewInfo
Imports DevExpress.Utils.Drawing
Namespace WindowsApplication1
Public Class MyLayoutSkinPaintStyle
Inherits LayoutSkinPaintStyle
Private _LayoutControl As MyLayoutControl
Public Sub New(ByVal lookAndFeelOwner As ISupportLookAndFeel)
MyBase.New(lookAndFeelOwner)
_LayoutControl = TryCast(lookAndFeelOwner, MyLayoutControl)
End Sub
Public Overrides Function GetTabbedGroupPainter() As TabbedGroupPainter
Return New MyTabbedGroupPainter(_LayoutControl)
End Function
End Class
End Namespace