Delphi Programming / Object Pascal
サイトのトップページへ リンクのページへ ロゴマーク
[掲載 2003年07月20日] [更新 2013年12月27日] 均等割付グラデーションボタンコンポーネント
均等割付グラデーションボタンコンポーネント
概要
クラス名 TplButton
バージョン番号 9.02 [2010年04月25日]
開発時動作確認
(VCL-32, VCL-64)
Delphi5Delphi6Delphi7Delphi2007Delphi2009Delphi2010DelphiXE
DelphiXE2DelphiXE3DelphiXE4DelphiXE5
テストEXE動作確認 WinXPWinXPWinVistaWin7-U64
その他 ソースコード、テストプログラムのEXEファイル付き
再配布、改変、転載、商用アプリでの使用も自由
plButton.zip [1,136 KB] [2011年10月02日 更新]







実はパネルである


TCustomPanel から作成したボタン風のパネルです。下図のように、主にボタンとして利用するために作成したので、名前をボタンとしました。Windows XP ではボタンのスタイルも変化しましたが、XP より前のアプリケーションで使用すれば、多少は見た目がよくなるのではないかと思います。

このコンポーネントを開発した当時とコンピュータの環境も Delphi の機能もだいぶ変化しました。そろそろこのようなコンポーネントの出番もなくなってくることでしょう。




主な仕様


  • キャプションが 2 行あり、右寄せ、中央、左寄せまたは均等割付で表示できます。
  • 各キャプションのアライメントと左右のオフセットが独立設定となっています。
  • キャプションのニモニック文字には対応していません。
  • グラデーションか単色のどちらかを選択する方式です。
  • 単色の場合は ParentColor プロパティが有効となります。
  • この性質を利用して、ラベルの様な目的に利用できます。
  • 普通のボタン風、フラット、フラットで枠線付き、角丸等のスタイルを選択できます
  • イメージも配置できますが、ビットマップとアイコンだけです。
  • フォーカスの有無を設定できます。
  • 標準のボタンと比べると、プロパティとメソッド等が十分ではありません。

図1
普通のボタン風にグラデーション
  • 著者が一番好んで使用しているもの
図2
フラットなタイプにグラデーション
  • 著者が次に好んで使用しているもの
図3
角が丸いタイプにグラデーション
  • あまり使用していない。でも折角作成したので使用を考えている
図4
普通のボタン風でグラデーションなし
  • 色付きボタンとして、動作状況を表示する際に、信号の様な役目で使用している
図5
フラットなタイプでグラデーションなし
  • 均等割付キャプションのパネルまたはラベルとして使用している。主に TEdit や TComboBox をこのパネル内に配置して使用している
図6
角が丸いタイプでグラデーションなし
  • これも均等割付キャプションのパネルまたはラベルとして利用できそうである