delphi中dbradiogroup用法

首先，你得确定bai你的 DBRadioGroup 绑定的数du据字段无zhi误。
然后下面的就是进dao行判断选择的代码：zhuan
IF DBRadioGroup.Items[DBRadioGroup.ItemIndex]='新试样shu' THEN
BEGIN
//执行你的新试样代码
END
ELSE IF DBRadioGroup.Items[DBRadioGroup.ItemIndex]='旧试样' THEN
BEGIN
//执行你的旧试样代码
END;
另：suetrain的答案明显是错的，看都不用看了，原因很明显，DBRadioGroup.Items是一个TStrings类，怎么可能会有checked这个属性，直接无视就可以。

 

if dbradiogroup.items[0].checked then
if dbradiogroup.items[1].checked then

 

你看我的图片可能使你要的。。。。。