![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как изменить стандартный цвет ProgressBar [D7, WinXP]
_Progr © (2005-08-26 09:06:00)Привет всем ! Как изменить стандартный цвет ProgressBar?
New_user (2005-08-26 12:00:00) [1]А при использовании windows.res этот способ пройдёт ?
Big Joe (2005-08-26 09:11:00) [2]Не забудь !
uses
CommCtrl;
Big Joe (2005-08-26 09:10:00) [3]procedure TForm1.Button1Click(Sender: TObject);
begin
// Set the Background color to teal
Progressbar1.Brush.Color := clTeal;
// Set bar color to yellow
SendMessage(ProgressBar1.Handle, PBM_SETBARCOLOR, 0, clYellow);
end;