如何获得窗体中RadioButton的状态

Question

//建议你用TCheckBox
//---------------------------------------------------------------------------
void __fastcall TForm1::CheckBox1Click(TObject *Sender)
{
  Edit1->Enabled = ((TCheckBox*)Sender)->Checked;
}
//---------------------------------------------------------------------------

Answer 1

if RadioButton1.Checked:=true then edit1.Enabled:=true;
你的这一句有错误！“:=”应为“=”
应为if RadioButton1.Checked=true then edit1.Enabled:=true;
另外，你可以用RadioButton的onclick事件，在它下面添加代码即可！

Answer 2

procedure TForm1.CheckBox1Click(Sender: TObject);
begin
  Edit1.Enabled := TCheckBox(Sender).Checked;
end;