VCLフォームへのカスタムタイトルバーの追加方法

RAD Studio / Delphi / C++Builder 10.4 Sydney で追加されたTTitleBarPanel コンポーネント(VCL)を使用することで、モダンなWindowsアプリケーション（Google ChromeやMicrosoft Edgeなど）のように、ウィンドウのタイトルバー部分に検索バー、ボタン、タブなどのカスタムコントロールを配置することができます。このプログでは、以下のHPを基に、その方法を説明します。

VCL フォームのカスタムタイトルバー - RAD Studio

カスタムタイトルバーの追加方法
カスタムタイトルバーの修正
参考URL

カスタムタイトルバーの追加方法

VCLの空のプロジェクトの作成

まず、メニューの「ファイル」-> 「新規作成」-> 「Windows VCL アプリケーション C++Builder」を選択し実行します。

以下のようなVCLの空のプロジェクトを作成されます。このメインフォームのタイトルバーをカスタムタイトルバーに変更してみましょう。

最初に、メニューの「ファイル」-> 「プロジェクトに名前を付けて保存」で、プロジェクトを保存しておきましょう。ここでは、プロジェクト名を「TitleBarPanelT1」としています。

プロジェクトの設定

実行ファイル単体で動作するように、事前にプロジェクトの設定で以下の項目を設定します。

「C++リンカ」->「動的RTLとリンクする」： falseにします。
「パッケージ」->「動的パッケージ」->「実行時パッケージを使ってリンク」： falseにします。

「動的RTLとリンクする」： false

実行時パッケージを使ってリンク」： false

TTitleBarPanelコンポーネントをDrop

パレットから、TTitleBarPanelコンポーネントを選択して、メインフォームにDropします。

CustomTitleBarプロパティの設定

TTitleBarPanelコンポーネントが、タイトルバーの下に配置されています。次に、メインフォームのCustomTitleBarプロパティの設定を変更して、TTitleBarPanelコンポーネントのみの表示にします。

CustomTitleBar.Control プロパティに、「TitleBarPanel1」（TTitleBarPanelコンポーネント）を選択
CustomTitleBar.Enabled プロパティをTrueにセット

CustomTitleBar のプロパティ

Formの CustomTitleBarプロパティは、タイトルバーのふるまいを制御するだけでなく、一般的なペイントシナリオ（タイトルバーのキャプションをペイントしない、など）も制御します。これにより、カスタムペイントをすべて実装しなくても、これらのシナリオを処理することができます。


CaptionAlignment	キャプションをどこに描画するか指定することができます。Windows 10 では、デフォルトでは左に描画しますが、Windows 8 のように中央にキャプションを描画したり、右揃えにすることもできます。
Control	フォームに配置された TTitleBarPanel に設定します。タイトルバー上のカスタムコントロールについては、以下のセクションを参照してください。
Enabled	カスタムタイトルバーの利用を有効化または無効化します。
Height	タイトルバーの高さをピクセルで表します。タイトルバーの高さを変更するには、タイトルバーをデフォルトのシステムの高さに限定してしまう SystemHeight をオフにします。その後、Height プロパティを任意の値に設定します。
ShowCaption	キャプションを描画するかどうかを制御します。
ShowIcon	フォームのアイコンを、タイトルバーの左端に描画するかどうかを制御します。
SystemHeight	True に設定された場合、タイトルバーの高さは常に、現在の画面で他のウィンドウに使用されている値となります。タイトルバーの高さをカスタマイズするには、SystemHeight を無効にし、その後 Height プロパティに値を入力します。
SystemColors	タイトルバーのキャプションとボタンが、有効または無効の際に、システム色またはカスタム色のどちらを使用するのか制御します。これは、タイトルバーを、システムが使用するのとは異なる背景色および前景色を使用して描画したい場合に、すべてカスタムペイントをする必要がないため、便利です。
	True の場合、背景色、キャプション、システムボタンは、他のアプリケーションのようにシステムデフォルトの色を使用してペイントします。False の場合、色プロパティ（以下参照）に用意した色が使用されます。
	使用されるカスタム色については、TTitleBarPanel をフォームに配置し、それに CustomTitleBar.Control プロパティを設定します。たとえタイトルバーパネルが空でコンロトールが何も置かれていなくても、予定しているタイトルバーへのコントロール配置通りに設定してください。
BackgroundColor ForegroundColor InactiveBackgroundColor InactiveForegroundColor	タイトルバーがペイント時に使用する色を指定するのに使用されます。SystemColors を True に設定すると、これらの値を無視し、現在のシステムデフォルトを使用してペイントします。
ButtonBackgroundColor ButtonForegroundColor ButtonHoverBackgroundColor ButtonHoverForegroundColor ButtonInactiveBackgroundColor ButtonInactiveForegroundColor ButtonPressedBackgroundColor ButtonPressedForegroundColor	カスタムボタンがあったり、タイトルバーがカスタム描画される際に、システムボタンによって使用される色を指定します。SystemColors を True に設定すると、これらの値を無視し、現在のシステムデフォルトを使用してペイントします。