1、写一个tradionbutton的onclick事件就可以了,
然后所有的radionbutton的onclick指向所写的那个radionbutton的onclick事件,操作时用Tradionbutton(sender)就是当前点击的radionbutton
2、你设一个公用变量serabutton:Tradionbutton,radionbutton的事件中写一句,serabutton:=Tradionbutton(sender);
然后对当前选中的操作就是对serabutton操作

解决方案 »

  1.   

    不好意思啊?怎么把所有的radionbuttion的onclick事件,指向那个onclick
      

  2.   

    第1个问题,你可以试着用一下TActionList控件,很好用的,双击它,新建一个项目,取名,填写Caption,然后在Button的Action属性里引用进来就OK了.同一段代码可以被不同的按钮引用.还用,这个控件的项目的事件,刚才说的代码就写在OnExecute事件中,还有另外一个很有用的事件OnUpdate,它是在系统Idle时触发的,用起来用点象Timer,很方便
      

  3.   

    第二个问题解决了,我是用
        for i:=0 to form_supervise.ComponentCount-1 do
        if components[i] is TRadiobutton  then
              begin
                 if Tradiobutton(components[i]).Checked then 
                  showmessage(components[i].Name);
              end;
        第一个问题只是变通解决一下...                  
      

  4.   

    虽然有点看不大懂各位的回复,但是问题毕竟是解决了,谢谢大家的关心.....hoho,结贴