Question

delphi 中的RadioGroup

RadioGroup 有四个RadioButton 我想获取 选中的RadioButton 的 名字

问得比较菜 还请大家赐教
我在RadioGroup 的 Items中添加的 4个RadioButton 分别为 1、2、3、4 即 当我选中 其中一个 RadioButton时 返回的是 RadioButton的内容 即1、2、3、4 请问有没有直接的属性 或者方法 可以直接实现

Answer 1

是不难的，可以这样。你是不是在RadioGroup上加了4个RadioButton?如果是如下
在其中的一个RadioButton的onclick事件写如下代码
showmessage((Sender as TRadioButton).Name);
然后，其它的RadioButton事件也连到这个按钮上。就是在事件中，找到onclick,在列表中选择你刚刚写代码的RadioButton中。
就可以了。你选哪一个，显示的就是这个RadioButton按钮的名字。

Answer 2

procedure TForm1.RadioGroup1Click(Sender: TObject);
begin
edit1.Text:=inttostr(RadioGroup1.ItemIndex);//这是索引
edit2.Text:=RadioGroup1.Items[RadioGroup1.ItemIndex];//这是内容
end;

Answer 3

procedure TForm1.RadioGroup1Click(Sender: TObject);
begin
if RadioGroup1.Buttons[RadioGroup1.ItemIndex].Checked then
ShowMessage(RadioGroup1.Buttons[RadioGroup1.ItemIndex].Caption);
end;

Answer 4

没有直接的属性，只能传值。