>>105

int i;
AnsiString s;

s = "#000000";
i = ("0x" + s.SubString(2, 6)).ToInt();
Form1->Canvas->Pen->Color = TColor(i);
Form1->Canvas->Brush->Color = TColor(i);

こんな感じで逝けるのでは？