我编的程序里面判断if radiogroup1.itemindex=0 then............
为什么我运行时已经点过了radiogroup1中的一项,而radiogroup1.itemindex仍然等于-1呢?明明有一项是选中的阿

解决方案 »

  1.   

    我这样是对的呀,你每项必需中在Items里增加才对,不能拖一个TRadio来创建
    procedure TForm1.RadioGroup1Click(Sender: TObject);
    begin
      showmessage(Inttostr(RadioGroup1.ItemIndex))
    end;
      

  2.   

    procedure TForm1.Button1Click(Sender: TObject);
    begin
     Showmessage(inttostr(RadioGroup1.ItemIndex));
    end;这样测试一下!
    没有选中就是-1
    选中的就会返回当前选中的itemindex的值!