From d4b4c2078b887b4af340e39250de88354c8d90a9 Mon Sep 17 00:00:00 2001
From: Jonathan Jenne <j.jenne@digitaldata.works>
Date: Mon, 25 May 2020 12:00:01 +0200
Subject: [PATCH] fix focus state for datepicker/lookup control

---
 Global_Indexer/ClassControls.vb | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/Global_Indexer/ClassControls.vb b/Global_Indexer/ClassControls.vb
index e282989..ea4cbae 100644
--- a/Global_Indexer/ClassControls.vb
+++ b/Global_Indexer/ClassControls.vb
@@ -75,6 +75,7 @@ Public Class ClassControls
                     .IndexType = DataType
                 }
             }
+            oControl.Properties.AppearanceFocused.BackColor = Color.Lime
 
             If Not String.IsNullOrEmpty(Vorgabe) Then
                 Dim oDefaultValues As New List(Of String)
@@ -372,6 +373,7 @@ Public Class ClassControls
                 .IndexType = DataType
             }
         }
+        oPicker.Properties.AppearanceFocused.BackColor = Color.Lime
 
         Return oPicker
     End Function