RadioButton有一个checked的属性,选中时为真,反之为假。
则:
if RadioButton1.Checked then
table1.fieldvalues['性别']:='男';
if RadioButton2.Checked then
table1.fieldvalues['性别']:='女';
if radiobutton1.Checked then table1.fieldvalues['性别']:=radiobutton1.Caption
if radiobutton2.Checked then table1.fieldvalues['性别']:=radiobutton2.Caption