First create solution

2017-03-08 11:21:27 +01:00
commit a2fb86bacf
5508 changed files with 1082238 additions and 0 deletions
@@ -0,0 +1,20 @@
+Imports Microsoft.VisualBasic
+Imports System
+Imports DevExpress.ExpressApp.Editors
+Imports DevExpress.ExpressApp.Win.Editors
+Imports DevExpress.ExpressApp
+Imports DevExpress.ExpressApp.Model
+Imports DevExpress.XtraEditors
+
+Public Class DateTimeEditor
+    Inherits DatePropertyEditor
+    Public Sub New(ByVal objectType As Type, ByVal item As IModelMemberViewItem)
+        MyBase.New(objectType, item)
+    End Sub
+    Protected Overrides Sub SetupRepositoryItem(ByVal item As DevExpress.XtraEditors.Repository.RepositoryItem)
+        MyBase.SetupRepositoryItem(item)
+        Dim defaultItem As RepositoryItemDateTimeEdit = CType(item, RepositoryItemDateTimeEdit)
+        defaultItem.VistaDisplayMode = DevExpress.Utils.DefaultBoolean.True
+        defaultItem.VistaEditTime = DevExpress.Utils.DefaultBoolean.True
+    End Sub
+End Class