通过特殊处理 Resize 事件解决 WinForm 加载时闪烁问题的一个方法

WinForm 上放置的控件多了或者有大背景图，窗体加载时就会闪烁，对于一般的闪烁，设置 DoubleBuffer=True或许有一点改善，要立竿见影的解决可以重载 CreateParams 使用 WS_CLIPCHILDREN 参数初始化窗体，相关的文章网上多不胜数，这里也就不再赘述。

WS_CLIPCHILDREN 方法虽好，但是就其原理，不是哪里都能拿来用的。比如需要子窗体刷新的场景下，如绘图或者实时视频显示的时候上了这一剂猛药，就玩不下去了，需要改换其他的办法。

最近在MDI子窗体上加载 SplitContainer 控件，然后在控件的 Panel里面加载多个自定义的VideoPlayer控件就遇到了Form Load 时窗体闪烁严重的问题。

通过 Debug.Print 在窗体加载过程中的所有事件中输出日志，很快发现是MDI子窗体加载，最大化，激活等等触发了很多次 Resize，每次 Resize 都会导致窗体重绘，于是对症下药，针对这种情况，增加一个计数器，先将作为容器的 SplitContainer 控件 Hide 起来，等到Resize 够了再把它 Show 出来。前后对比，闪烁问题改善明显。

 1     Public Sub New()
 2         ' 此调用是设计器所必需的。
 3         InitializeComponent()
 4         ' 在 InitializeComponent() 调用之后添加任何初始化。
 5         SplitContainer1.Hide()
 6     End Sub
 7 
 8     Private _iResized As Int32
 9     Protected Overrides Sub OnResize(e As EventArgs)
10         MyBase.OnResize(e)
11 
12         _iResized += 1
13         Debug.Print("============================ OnResize {0} ({1}) ============================",
14 　　　　　　　　　　　　_iResized, Me.Size)
15  
16  
17         
18         If _iResized = 5 AndAlso SplitContainer1.Visible = False Then
19             '5 是统计得出的窗体加载过程中最后一次 Resize
20             Application.DoEvents()
21             SplitContainer1.Show()
22         End If
23     End Sub

这个办法一点都不高大上，希望能帮到不能使用 WS_CLIPCHILDREN 解决闪烁问题的人。

转载于:https://www.cnblogs.com/towerbit/p/10597891.html