FMX.Colors
FMX.Colors ユニットは、FireMonkey の色関連のクラスやメソッドが登録されているユニットです。
FMX.Colors ユニットの有用な機能を紹介していくシリーズです!
3種類のトラックバー
TBitmapTrackbar という Bitmap を背景として使うタイプの TrackBar が FMX.Colors には3種類搭載されています。
| トラックバーの名前 | 用途 |
|---|---|
| THueTrackBar | 色相を表す |
| TBWTrackBar | 濃淡を表す |
| TAlphaTrackBar | α値を表す |
使い方
コントロールは Colors カテゴリーに登録されているので、ドロップして普通のコントロールと同じように使えます。
それぞれ、単独では使い道はほとんど無く、他のコントロールと組み合わせて使う物でしょう。
試しに、TColorPicker, TColorQuad, TColorBox と TAlphaTrackBar を組み合わせて見ると…こんな風に TColorBox と Alpha が連動していますね。
これは、下記の様に ColorQuad.Alpha に AlphaTrakBar.Value を入れただけです(ColorBox は触っていません!)
procedure TForm1.AlphaTrackBar1Change(Sender: TObject);
begin
ColorQuad1.Alpha := AlphaTrackBar1.Value;
end;
プロパティ・イベント
独自のプロパティはほとんどありません。
Value プロパティ
Value プロパティは、この3種の TrackBar 固有のプロパティではありませんが、重要なので紹介します。
Value プロパティが現在選ばれている Hue, BW, Alpha の値になります。
値は0~1です。
TAlphaTrackBar.BackgroundSquareSize プロパティ
BackgroundSquareSize プロパティは、背景の格子模様の四角形のサイズを指定できます。
大きくした時の見栄えを変更できますね。
OnChange イベント
3種類全ての TrackBar に OnChange イベントがあります。
OnChange イベントは Value プロパティの値が変更されたときに呼ばれます。
おわりに
それぞれの TrackBar は、こんな用途に使えます。
| 名前 | 用途 |
|---|---|
| THueTrackBar | カラーピッカー等 |
| TBWTrackBar | コントラストや明度等 |
| TAlphaTrackBar | カラーピッカーや透過表現等 |
これらのパーツを組み合わせて色々な効果を簡単に制御できそうですね。
コミュニティ紹介
Delphi のコミュニティについても改めて紹介しておきます。
Delphi Discord Server(最も活発)
Delphi に関する質問・最新情報・雑談など、とにかく情報が早いコミュニティです。
お気軽に参加できます。
Delphi Discord Server 紹介ページ
※こちらは招待リンクそのものではありません。招待リンクは遷移先ページにあります。
その他のコミュニティ
Qiita のこちらの記事に、日本語圏で参加しやすいコミュニティをまとめています。

