Delphi, Como mudar a cor de um StatusBar

Vá até seu projeto e siga os passos abaixo:
-> Insira o statusbar 
-> duplo clique no statusbar 
-> insira quantos panels for necessário (no minimo 1) 
-> escolha um panel e coloque style = psOwnerDraw 
-> Feche o editor de panels e selecione a status bar 
-> no Object inspector, na aba events selecione o evento OnDrawPanel 
-> Coloque o código abaixo: