Messenger Flackern, DBL Buffer

SDL/kunden/usrCntlKundenuebersicht.vb

@@ -71,6 +71,10 @@ Public Class usrCntlKundenuebersicht
         Catch ex As Exception
 
         End Try
+        Me.DoubleBuffered = True
+        SetStyle(ControlStyles.OptimizedDoubleBuffer Or ControlStyles.UserPaint Or ControlStyles.AllPaintingInWmPaint Or ControlStyles.ResizeRedraw, True)
+        UpdateStyles()
+
     End Sub
 
 
@@ -83,6 +87,9 @@ Public Class usrCntlKundenuebersicht
 
         End Try
 
+        Me.DoubleBuffered = True
+        SetStyle(ControlStyles.OptimizedDoubleBuffer Or ControlStyles.UserPaint Or ControlStyles.AllPaintingInWmPaint Or ControlStyles.ResizeRedraw, True)
+        UpdateStyles()
     End Sub
     Private Sub initCboKd()
 

SDL/kunden/usrcntlKundeBearbeitenFull.vb

@@ -26,6 +26,10 @@ Public Class usrcntlKundeBearbeitenFull
         ' Dieser Aufruf ist für den Designer erforderlich.
         InitializeComponent()
         loadControls()
+        Me.DoubleBuffered = True
+        SetStyle(ControlStyles.OptimizedDoubleBuffer Or ControlStyles.UserPaint Or ControlStyles.AllPaintingInWmPaint Or ControlStyles.ResizeRedraw, True)
+        UpdateStyles()
+
     End Sub
     Sub New(kdnr)
         InitializeComponent()
@@ -34,6 +38,10 @@ Public Class usrcntlKundeBearbeitenFull
         'If kdnr > 0 Then
         '    init(kdnr)
         'End If
+        Me.DoubleBuffered = True
+        SetStyle(ControlStyles.OptimizedDoubleBuffer Or ControlStyles.UserPaint Or ControlStyles.AllPaintingInWmPaint Or ControlStyles.ResizeRedraw, True)
+        UpdateStyles()
+
     End Sub