-
Notifications
You must be signed in to change notification settings - Fork 4
/
Copy pathHeatmapOptionsForm.vb
36 lines (33 loc) · 1.13 KB
/
HeatmapOptionsForm.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
Imports System
Imports System.Collections.Generic
Imports System.Linq
Imports System.Windows.Forms
Imports DevExpress.DashboardCommon
Imports DevExpress.DashboardWin.Native
Imports DevExpress.XtraLayout
Imports DevExpress.XtraLayout.Utils
Imports DevExpress.DashboardWin.CustomItemExtension
Namespace DevExpress.DashboardWin.CustomItemExtension.Heatmap
Partial Public Class HeatmapOptionsForm
Inherits DashboardForm
Public Sub New()
InitializeComponent()
End Sub
Public Sub New(ByVal palette As MapPalette, ByVal scale As MapScale)
Me.New()
valueMapControl.InitializeFrom(palette, scale)
End Sub
Public Function GetScale() As MapScale
Return valueMapControl.GetScale()
End Function
Public Function GetPalette() As MapPalette
Return valueMapControl.GetPalette()
End Function
Private Sub OnBtnOKClick(ByVal sender As Object, ByVal e As EventArgs) Handles btnOK.Click
DialogResult = DialogResult.OK
End Sub
Private Sub OnBtnCancelClick(ByVal sender As Object, ByVal e As EventArgs) Handles btnCancel.Click
DialogResult = DialogResult.Cancel
End Sub
End Class
End Namespace