Delphi 2006 から導入された Margin と Padding プロパティの動作を確認します。

動作の確認

Win32アプリケーションを新規作成します。次にPanelを一枚配置します。


Marginプロパティをセットします。Margin.Bottom Margin.Top Margin.Right Margin.Left すべて50にしてみます。
#img("delphi2006-margin-padding-02)

ガイドラインのスナップ位置はMarginプロパティによって変わるようです。ウィンドウの端から50ピクセルでスナップするようにガイドラインが表示されるようになりました。


次に、AlignプロパティをalClientにします。Panelが画面全体に表示されるようになりました。


ここでAlignWithMarginプロパティをTrueにします。Panelがウィンドウの端からMarginで設定した値の幅だけマージンをとるようにリサイズされます。


ウィンドウのサイズを小さくする下図のようになります。


先ほど配置して、Marginプロパティを編集したPanelを削除し、新たなPanelを配置します。AlignプロパティをalClientにします。


次にFormを選択しPaddingプロパティの値を変えてみます。下図はPadding.Bottomを50にしたときのものです。


Left Top Right もそれぞれPaddingプロパティを設定してみました。


Delphi2006では、Delphiのコンポーネントにおいても、スタイルシートで用いられる、Margin Paddingの概念が実現できるようになりました。リサイズされるウィンドウできれいにコンポーネントを配置するのに重宝するかもしれません。