void __fastcall TChatClientMFrm.BtnColorClick(TObject *Sender)
{
    if (ColorDialog1->Execute) {
        PaintBox1->Canvas->Brush->Color = ColorDialog1->Color;
        PaintBox1->Canvas->FillRect(PaintBox1->ClientRect);
    }
}
이렇게 되지 않을까요?
정확한건지는 저도 확실히..

글자색 님이 쓰신 글 :
: bitbtn버튼하고 ccolorgrid를 이용해서 채팅 프로그램에서 원하는 색으로 설정 후 글자를 치고 입력을 하면
:
: 색이 바뀌게 할려고하는데 델파이에서는 이런 식으로 되어있더라고요
:
:
: procedure TChatClientMFrm.BtnColorClick(Sender: TObject);
: begin
:   if ColorDialog1.Execute then
:   begin
:     PaintBox1.Canvas.Brush.Color := ColorDialog1.Color;
:     PaintBox1.Canvas.FillRect(PaintBox1.ClientRect);
:   end;
: end;
:
: 이것을 빌더에서는 어떻게 바꿔야 될까여?