Как изменить стандартный цвет ProgressBar 2

uses 
  CommCtrl; 

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;

Похожие по теме исходники

Couleur (цветовая палитра)

Изменение цвета изображения

Improved Buttons and ProgressBar

Advanced ProgressBar

ProgressBar in ListView

Marquee ProgressBar

Marquee ProgressBar by Florenth

TQProgressBar

Copy File with ProgressBar

Недавно добавленные исходники
• DeLiKaTeS Tetris (Тетрис) 159 • TDictionary Custom Sort 3 336 • Fast Watermark Sources 3 087 • 3D Designer 4 846 • Sik Screen Capture 3 340 • Patch Maker 3 552 • Айболит (remote control) 3 657 • ListBox Drag & Drop 3 014 • Доска для игры Реверси 81 692 • Графические эффекты 3 944 • Рисование по маске 3 248 • Перетаскивание изображений 2 628 • Canvas Drawing 2 751 • Рисование Луны 2 579 • Поворот изображения 2 188 • Рисование стержней 2 168 • Paint on Shape 1 568 • Генератор кроссвордов 2 235 • Головоломка Paletto 1 767 • Теорема Монжа об окружностях 2 229 • Пазл Numbrix 1 685 • Заборы и коммивояжеры 2 057 • Игра HIP 1 282 • Игра Go (Го) 1 230 • Симулятор лифта 1 475 • Программа укладки плитки 1 216 • Генератор лабиринта 1 548 • Проверка числового ввода 1 365 • HEX View 1 497 • Физический маятник 1 358