鉄の掟：FlowLayoutPanelによる動的UI生成の極意
業務アプリケーションのUIにおいて、固定レイアウトの時代は終わった。画面解像度の多様化、そして増え続けるデータ量。これらに対応する「可変長カード型UI」は、もはやモダンなUIの必須要件だ。
多くのエンジニアが「なんとなく」配置する`FlowLayoutPanel`だが、これを「極限まで使いこなす」には、Windows Formsの描画サイクルとメモリマネジメントに対する深い洞察が不可欠である。今回は、レガシーなVB.NET環境において、いかに堅牢かつ高速に動的ボタン配置を実装するか、その深淵を説こう。
—
1. 再描画のボトルネックを排除せよ
大量の動的コントロールを生成する際、最も初心者が犯す過ちは「生成のたびにレイアウト計算を走らせる」ことだ。`FlowLayoutPanel`はデフォルトで、コントロールが追加されるたびに`PerformLayout()`を呼び出し、再描画の計算コストを浪費する。
これを防ぐのが「Suspend / Resume Layout」の鉄則だ。
”’
”’
Public Sub RefreshCardLayout(ByVal dataList As List(Of String))
‘ 1. レイアウトのサスペンド（再計算を一時停止）
flowLayoutPanel1.SuspendLayout()
‘ 2. 既存メモリの解放（重要：Disposeを明示的に呼び出す）
For Each ctrl As Control In flowLayoutPanel1.Controls
ctrl.Dispose()
Next
flowLayoutPanel1.Controls.Clear()
‘ 3. 動的生成
For Each item As String In dataList
Dim btn As New Button With {
.Text = item,
.AutoSize = True,
.Margin = New Padding(5)
}
flowLayoutPanel1.Controls.Add(btn)
Next
‘ 4. レイアウトの再開（一度だけ再計算）
flowLayoutPanel1.ResumeLayout(True)
End Sub
なぜDisposeが必要か？
VB.NET（.NET Framework）のガベージコレクタは優秀だが、UIコントロールという「GDIリソースを食う巨大なオブジェクト」を即座に回収するほど寛容ではない。明示的な`Dispose()`を忘れると、画面更新のたびにメモリリークが蓄積され、長期間起動し続ける業務端末では確実にクラッシュする。
—
2. Windows APIによる境界線の排除
`FlowLayoutPanel`にカードを並べると、どうしても納得がいかないのが「枠線」や「パディングの微妙な挙動」だ。Windows Formsの標準コントロールは、OSのテーマに依存しすぎる。
特定の業務仕様で「グリッド線なしの完全にフラットなリスト」を要求された場合、`FlowLayoutPanel`の親コンテナに対して`SendMessage` APIを送り、描画を制御することがある。
‘ Windows APIのインポート
Private Shared Function SendMessage(ByVal hWnd As IntPtr, ByVal Msg As Integer, ByVal wParam As IntPtr, ByVal lParam As IntPtr) As IntPtr
End Function
Private Const WM_SETREDRAW As Integer = &HB
‘ 描画の完全停止（より強力な制御）
SendMessage(flowLayoutPanel1.Handle, WM_SETREDRAW, IntPtr.Zero, IntPtr.Zero)
‘ …処理…
SendMessage(flowLayoutPanel1.Handle, WM_SETREDRAW, New IntPtr(1), IntPtr.Zero)
flowLayoutPanel1.Refresh()
この手法は、数千件単位のカードを一度に再描画するような、極端な高負荷シーンでのみ使用せよ。日常的な利用は`SuspendLayout`で十分だ。
—
3. イベントハンドラを「疎結合」に保つ極意
動的に生成したボタンにイベントを紐付ける際、匿名メソッド（ラムダ式）を乱用してはならない。メモリリークの温床になるからだ。
‘ 悪い例：ラムダ式でキャプチャし続けると、親フォームが破棄されてもメモリが残る可能性がある
‘ AddHandler btn.Click, Sub(s, e) MsgBox(item)
‘ 良い例：Tagプロパティに値を保持し、共通のハンドラを定義する
Dim btn As New Button
btn.Tag = dataId ‘ 識別子を格納
AddHandler btn.Click, AddressOf OnCardClicked
このように、イベントハンドラを専用の`Private`メソッドに逃がすことで、オブジェクトの生存期間を明確にコントロールできる。これは大規模システムにおける保守の要である。
—
4. 最後に：なぜVB.NETでこれをするのか
「C#に移行すべきでは？」という声が聞こえてきそうだ。だが、レガシーな業務システムには、十数年蓄積されたVB.NETのコードベースがある。すべてをリプレースするのは現実的ではない。
「今ある資産を、最新のアーキテクチャの知見で磨き上げる」ことこそが、真のシニアエンジニアの役割だ。
`FlowLayoutPanel`を単なるコンテナとして使うのではなく、メモリ、イベント、描画サイクルの制御下に置く。この視点を持つだけで、君たちが作る業務UIは、軽快で堅牢な、プロフェッショナルなツールへと変貌するはずだ。
コードは嘘をつかない。君が書いた制御一つひとつが、現場のストレスを減らし、業務を加速させる。健闘を祈る。
