フリーソフト

« [Delphi] ファイル名をドライブ、パス、ファイル名に分解 | トップページ | [BCB] ProgressBarの色を変える »

[Delphi] ProgressBarの色を変える

以下のようにするとProgressBarのバーの部分の色が変えられます。

uses CommCtrl;

procedure TForm1.FormCreate(Sender: TObject);
begin
 SendMessage(ProgressBar1.Handle, PBM_SETBARCOLOR, 0, clTeal);
 //SendMessage(ProgressBar1.Handle, PBM_SETBARCOLOR, 0, RGB(255,255,0));
end;

« [Delphi] ファイル名をドライブ、パス、ファイル名に分解 | トップページ | [BCB] ProgressBarの色を変える »

Delphi」カテゴリの記事

TProgressBar」カテゴリの記事

コメント

この記事へのコメントは終了しました。