add keybinding for profile selector

Global_Indexer/ClassPatterns.vb

@@ -1,7 +1,7 @@
 Imports System.Text.RegularExpressions
 Imports DevExpress.XtraEditors
 Imports DigitalData.Controls.LookupGrid
-Imports DigitalData.Modules.Language
+Imports DigitalData.Modules.Base
 Imports DigitalData.GUIs.GlobalIndexer
 Imports WINDREAMLib
 
@@ -240,7 +240,7 @@ Public Class ClassPatterns
                                         LOGGER.Warn("Lookup Control with [{0}] is not supported!", oFoundType)
                                 End Select
                             Else
-                                oValue = Utils.NotNull(oLookupControl.Properties.SelectedValues.Item(0), "")
+                                oValue = ObjectEx.NotNull(oLookupControl.Properties.SelectedValues.Item(0), "")
                             End If
                         Catch ex As Exception
                             LOGGER.Error(ex)

Global_Indexer/Global_Indexer.vbproj

@@ -178,12 +178,6 @@
     <Reference Include="DigitalData.Modules.Database">
       <HintPath>..\..\DDModules\Database\bin\Debug\DigitalData.Modules.Database.dll</HintPath>
     </Reference>
-    <Reference Include="DigitalData.Modules.Filesystem">
-      <HintPath>..\..\DDModules\Filesystem\bin\Debug\DigitalData.Modules.Filesystem.dll</HintPath>
-    </Reference>
-    <Reference Include="DigitalData.Modules.Language">
-      <HintPath>..\..\DDModules\Language\bin\Debug\DigitalData.Modules.Language.dll</HintPath>
-    </Reference>
     <Reference Include="DigitalData.Modules.License">
       <HintPath>..\..\DDModules\License\bin\Debug\DigitalData.Modules.License.dll</HintPath>
     </Reference>

Global_Indexer/frmIndex.designer.vb

@@ -97,6 +97,7 @@ Partial Class frmIndex
         'SplitContainer1.Panel2
         '
         Me.SplitContainer1.Panel2.Controls.Add(Me.DocumentViewer1)
+        Me.SplitContainer1.TabStop = False
         '
         'pnlIndex
         '
@@ -274,6 +275,7 @@ Partial Class frmIndex
         resources.ApplyResources(Me.DocumentViewer1, "DocumentViewer1")
         Me.DocumentViewer1.FileLoaded = False
         Me.DocumentViewer1.Name = "DocumentViewer1"
+        Me.DocumentViewer1.TabStop = False
         '
         'BarToggleSwitchItem1
         '

Global_Indexer/frmIndex.resx

@@ -139,7 +139,7 @@
     <value>636, 433</value>
   </data>
   <data name="pnlIndex.TabIndex" type="System.Int32, mscorlib">
-    <value>8</value>
+    <value>2</value>
   </data>
   <data name="pnlIndex.Visible" type="System.Boolean, mscorlib">
     <value>False</value>
@@ -424,7 +424,7 @@
     <value>441, 18</value>
   </data>
   <data name="checkMultiindex.TabIndex" type="System.Int32, mscorlib">
-    <value>12</value>
+    <value>3</value>
   </data>
   <data name="&gt;&gt;checkMultiindex.Name" xml:space="preserve">
     <value>checkMultiindex</value>
@@ -468,7 +468,7 @@
     <value>183, 44</value>
   </data>
   <data name="btnOK.TabIndex" type="System.Int32, mscorlib">
-    <value>11</value>
+    <value>4</value>
   </data>
   <data name="btnOK.Text" xml:space="preserve">
     <value>Datei verarbeiten</value>
@@ -565,7 +565,7 @@
     <value>636, 30</value>
   </data>
   <data name="ComboboxDoctype.TabIndex" type="System.Int32, mscorlib">
-    <value>3</value>
+    <value>1</value>
   </data>
   <data name="&gt;&gt;ComboboxDoctype.Name" xml:space="preserve">
     <value>ComboboxDoctype</value>
@@ -637,7 +637,7 @@
     <value>636</value>
   </data>
   <data name="SplitContainer1.TabIndex" type="System.Int32, mscorlib">
-    <value>8</value>
+    <value>0</value>
   </data>
   <data name="&gt;&gt;SplitContainer1.Name" xml:space="preserve">
     <value>SplitContainer1</value>

Global_Indexer/frmIndex.vb

@@ -2927,4 +2927,11 @@ Public Class frmIndex
             MsgBox(ex.Message)
         End Try
     End Sub
+
+    Private Sub ComboboxDoctype_KeyUp(sender As Object, e As KeyEventArgs) Handles ComboboxDoctype.KeyUp
+        If e.KeyCode = Keys.F2 Then
+            Dim oCombo As SearchLookUpEdit = sender
+            oCombo.ShowPopup()
+        End If
+    End Sub
 End Class

Global_Indexer/frmStart.resx

@@ -606,7 +606,7 @@
     <value>True</value>
   </metadata>
   <metadata name="$this.TrayHeight" type="System.Int32, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
-    <value>203</value>
+    <value>90</value>
   </metadata>
   <data name="$this.ClientSize" type="System.Drawing.Size, System.Drawing">
     <value>294, 161</value>

Global_Indexer/frmStart.vb

@@ -1,12 +1,9 @@
 Imports System.IO
-Imports Microsoft.Office.Interop
-Imports System.Text
 Imports System.Globalization
 Imports System.Threading
-Imports System.Runtime.InteropServices
-Imports DigitalData.Modules.Language
 Imports DigitalData.Modules.Windows
 Imports DigitalData.Modules.License
+Imports DigitalData.Modules.Base
 Imports DigitalData.GUIs.Common
 
 Public Class frmStart
@@ -250,10 +247,10 @@ Public Class frmStart
                 End If
             End If
 
-            For Each Filerow As DataRow In DTACTUAL_FILES.Rows
+            For Each oRow As DataRow In DTACTUAL_FILES.Rows
-                Dim oFileString As String = Filerow.Item("FILENAME2WORK")
+                Dim oFileString As String = oRow.Item("FILENAME2WORK")
-                Dim oFileGuid = Filerow.Item("GUID")
+                Dim oFileGuid = oRow.Item("GUID")
-                Dim oFileHash = Utils.NotNull(Filerow.Item("FILE_HASH"), "")
+                Dim oFileHash = oRow.ItemEx("FILE_HASH", "")
                 LOGGER.Info("Processing user file {0}", oFileString)
 
                 CURRENT_FILENAME = oFileString