重置AdvOfficeRadioGroup1（TMS组件）中项目的itemindex

Question

如果取消选中该复选框，如何将AdvOfficeRadioGroup1中项目的项目索引设置为-1？取消选中会禁用项目，但选择仍然可见。

编辑：

Answer 1

附上此代码：

PROCEDURE TMainForm.AdvOfficeRadioGroup1CheckBoxClick(Sender : TObject);
  BEGIN
    IF AdvOfficeRadioGroup1.CheckBox.Checked THEN BEGIN
      IF AdvOfficeRadioGroup1.Tag>=0 THEN AdvOfficeRadioGroup1.ItemIndex:=AdvOfficeRadioGroup1.Tag;
      AdvOfficeRadioGroup1.Tag:=-1
    END ELSE BEGIN
      AdvOfficeRadioGroup1.Tag:=AdvOfficeRadioGroup1.ItemIndex;
      AdvOfficeRadioGroup1.ItemIndex:=-1
    END
  END;

到OnCheckBoxClick事件。它将使用AdvOfficeRadioGroup的Tag属性来存储先前选择的ItemIndex，以便在您再次选中该复选框时可以恢复它。