我把checkbox放到AdvStringGrid後點擊它不能改變其cheched屬性，
各位高人幫忙，急
void __fastcall TForm1::FormCreate(TObject *Sender)
{
TRect Rect;
CheckBox1->Parent = AdvStringGrid1;
Rect=AdvStringGrid1->CellRect(1,1);
CheckBox1->SetBounds(Rect.left,Rect.top,Rect.Width(),Rect.Height());
CheckBox1->Checked=false;

CheckBox1->OnClick= AdvStringGrid1Click;
}
}
//---------------------------------------------------------------------------
void __fastcall TForm1::AdvStringGrid1Click(TObject *Sender)
{
CheckBox1->Checked=!CheckBox1->Checked;
}