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

Как изменить стандартный цвет 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;

Авто - Аudio, TV, GPS: полироль для автомобиля. Любишь автомобили? . аренда квартир в Василеостровском районе . vaio ноутбуки . Таможня Логистика Склад Запчасти: запчасти hyundai hd 72. Запчасти Hyundai 72. . Хотин Алексей .