Use DateEdit control, add TopMost for email attachment indexing, use fixed lookupgrid, email indexing objecttype readonly

Global_Indexer/ClassControls.vb

@@ -362,11 +362,10 @@ Public Class ClassControls
     End Sub
 
 
-    Public Function AddDateTimePicker(indexname As String, y As Integer, DataType As String)
-        Dim dtp As New DateTimePicker With {
+    Public Function AddDateTimePicker(indexname As String, y As Integer, DataType As String) As DevExpress.XtraEditors.DateEdit
+        Dim oPicker As New DevExpress.XtraEditors.DateEdit With {
             .Name = "dtp" & indexname,
-            .Format = DateTimePickerFormat.Short,
-            .Size = New Size(133, 27),
+            .Size = New Size(260, 27),
             .Location = New Point(11, y),
             .Tag = New ControlMeta() With {
                 .IndexName = indexname,
@@ -374,9 +373,7 @@ Public Class ClassControls
             }
         }
 
-        AddHandler dtp.ValueChanged, AddressOf OndtpChanged
-
-        Return dtp
+        Return oPicker
     End Function
     Sub OndtpChanged()
         'offen was hier zu tun ist