Delphi 2005 のVCL.NET のSampleカテゴリにひっそりと TCollapsePanel というコンポーネントが追加されています。今回はこのコンポーネントを利用してみます。
TCollapsePanelをフォームに配置します。
Panel内部にボタンやチェックボックスを置いてみます。
これで、アプリケーションを実行します。起動すると下図のウィンドウが表示されます。
Headerの右側にある「>>」をクリックすると下図の状態に変わります。ヘッダの下のパネルが非表示になります。もう一度Headerをクリックすると、パネルが表示されます。
いったんアプリケーションを終了し、フォーム設計ウィンドウに戻ります。CollapsePanelを2枚おきます。それぞれAlign を alTopにします。
そして、アプリケーションを実行します。
上のほうのHeaderの「>>」ボタンをクリックしてみます。パネルが折りたたまれ、下のCollapsePanelが上に詰まってきます。
下のCollapsePanelも閉じてみました。
sampleにある目立たないコンポーネントですが、便利に使えるコンポーネントではないのでしょうか。
