单选框有两种常见的用法：

1、每次单击单选框时立即响应（单击事件）：
void __fastcall TForm1::CheckBox1Click(TObject *Sender)
{
if(CheckBox1->Checked)
 Edit1->Text="CheckBox is checked.";
else
 Edit1->Text="CheckBox is not checked.";
}

2、用命令按钮判断单选框的状态：

void __fastcall TForm1::Button1Click(TObject *Sender)
{
if(CheckBox1->Checked)
 Edit1->Text="CheckBox has been checked.";
else
 Edit1->Text="CheckBox has not been checked.";
}

我再友情奉献一个：让CheckBox控件在能勾选和不能勾选之间切换

http://www.3322ee.com/viewthread.php?tid=4326&extra=page%3D1