Изменить цвет полоски ProgressBar'а можно с помощью строчки кода приведенной ниже:
SendMessage(ProgressBar1->Handle, PBM_SETBARCOLOR, 0, clGreen);
В данном случае у нас будет полоска зеленая - clGreen. Соответственно, чтобы сделать другой цвет меняем значение.