如果是在文档上直接放RadioButton控件可以写代码访问这些RadioButton判读选中的是那个,然后自己给数据集的字段赋值来标识选中的RadioButton
类似
if TSQBSheetDoc(DocView3.Doc).RadioButton1.Checked then
dsbSQB.DataSet.FieldByName('WJLB').AsString := '规划设计'
else if TSQBSheetDoc(DocView3.Doc).RadioButton2.Checked then
dsbSQB.DataSet.FieldByName('WJLB').AsString := '施工设计(白图)'
else if TSQBSheetDoc(DocView3.Doc).RadioButton3.Checked then
dsbSQB.DataSet.FieldByName('WJLB').AsString := '施工设计(蓝图)';