|
||
解説: StatusBar コンポーネントは、アプリケーションの処理内容や経過情報などをユーザーに知らせるのに使うと便利です。 必要に応じて ProgressBar を配置したり、表示をフラットにしたり、視覚的に工夫を凝らすことができます。しかし、やりすぎると煩わしい面もでてきますのでほどほどがいいでしょう。 使用例: 以下の例では、StatusBar のパネル内にカラー文字を描いています。 準備としては、StatusBar を配置して、内にパネルを二つ、三つ用意しておきます。 パネルの Width を 150 ピクセルに Style を psOwnerDraw に設定してください。 アプリを起動すると、ステータスバーにカラー文字が表示されます。 キャンバスに文字列を描くのに TextOut メソッドを使っていますが、Win32API にも同名の関数があります。興味のある方は使い方の違いを調べてみてください。 //------------------------------------------------------------------- void __fastcall TForm1::StatusBar1DrawPanel(TStatusBar *StatusBar, TStatusPanel *Panel, const TRect &Rect) { StatusBar1->Canvas->Font->Color = clRed; StatusBar1->Canvas->TextOut(5, 5, "Status Bar1"); StatusBar1->Canvas->Font->Color = clBlue; StatusBar1->Canvas->TextOut(155, 5, "Status Bar2"); } //------------------------------------------------------------------- |