ms

Global_Indexer/frmIndex.vb

@@ -1995,8 +1995,17 @@ Public Class frmIndex
                 anz += 1
                 ylbl += 60
                 y += 60
-
+                'make y as height in fom
             Next
+            Dim pnlHeight = y - 30
+
+            If pnlIndex.Height < pnlHeight Then
+                If (Me.Height - 315) < pnlHeight Then
+                    Me.Height = (Me.Height - 315) + pnlHeight
+                End If
+                pnlIndex.Height = pnlHeight
+            End If
+
             SendKeys.Send("{TAB}")
         Catch ex As Exception
             ClassLogger.Add(" - Unexpected error in LoadIndexe_Man - Fehler: " & vbNewLine & ex.Message)