First create solution

This commit is contained in:
2017-03-08 11:21:27 +01:00
commit a2fb86bacf
5508 changed files with 1082238 additions and 0 deletions
@@ -0,0 +1,46 @@
Imports Microsoft.VisualBasic
Imports System
Imports System.Web.UI.WebControls
Imports DevExpress.ExpressApp
Imports DevExpress.ExpressApp.Editors
Imports DevExpress.ExpressApp.Web.Editors
Imports DevExpress.ExpressApp.Model
Imports DevExpress.DashboardWeb
Public Class DashboardViewerPropertyEditor
Inherits WebPropertyEditor
'Private DashboardViewerUserControlCore As DashboardViewerUserControl = Nothing
'Public ReadOnly Property DashboardViewerUserControl() As DashboardViewerUserControl
' Get
' Return DashboardViewerUserControlCore
' End Get
'End Property
Private _ASPxDashboardViewer As ASPxDashboardViewer
ReadOnly Property ASPxDashboardViewer As ASPxDashboardViewer
Get
Return _ASPxDashboardViewer
End Get
End Property
Public Sub New(ByVal objectType As Type, ByVal info As IModelMemberViewItem)
MyBase.New(objectType, info)
End Sub
Protected Overrides Function CreateViewModeControlCore() As WebControl
_ASPxDashboardViewer = New ASPxDashboardViewer
Return _ASPxDashboardViewer
End Function
Protected Overrides Function CreateEditModeControlCore() As WebControl
_ASPxDashboardViewer = New ASPxDashboardViewer
Return _ASPxDashboardViewer
End Function
Protected Overrides Function GetControlValueCore() As Object
Return _ASPxDashboardViewer
End Function
Protected Overrides Sub ReadEditModeValueCore()
End Sub
End Class