SND DoubleBuffer

Aviso/frmSendungsdetailsNEU.vb

@@ -38,11 +38,20 @@ Public Class frmSendungsdetailsNEU
 
     Sub New()
         InitializeComponent()
+        Me.DoubleBuffered = True
+        SetStyle(ControlStyles.OptimizedDoubleBuffer Or ControlStyles.UserPaint Or ControlStyles.AllPaintingInWmPaint Or ControlStyles.ResizeRedraw, True)
+        UpdateStyles()
+
+
     End Sub
     Sub New(AvisoId, SendungID)
         InitializeComponent()
         Me.AvisoId = AvisoId
         Me.SendungID = SendungID
+        Me.DoubleBuffered = True
+        SetStyle(ControlStyles.OptimizedDoubleBuffer Or ControlStyles.UserPaint Or ControlStyles.AllPaintingInWmPaint Or ControlStyles.ResizeRedraw, True)
+        UpdateStyles()
+
     End Sub
 
     Private Sub frmSendungsdetails_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing
@@ -1136,6 +1145,7 @@ Public Class frmSendungsdetailsNEU
         Me.Cursor = Cursors.WaitCursor
         loaded = False
         Try
+            SuspendLayout()
             lblAbfNr_Err.Visible = False
 
             '   lblAtrAufschubEustTxt.Visible = False
@@ -1508,11 +1518,11 @@ Public Class frmSendungsdetailsNEU
 
 
 
-
             'SAVE_ME ??????!!!!!!!
         Catch ex As Exception
             VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name)
         End Try
+        ResumeLayout()
         loaded = True
         '  Me.Enabled = True
         Me.Cursor = Cursors.Default