colored buttons with wrapped text

I want a non-gray button with more than one row of text.

Does it exist a button component in delphi which can do this, or do I have
to write one myself? If so, can anyone point me to information about how to
do this?

/Johannes