本文整理自网络,侵删。
procedure TForm1.RadioGroup1Click(Sender: TObject);begin ShowMessage('['+inttostr(RadioGroup1.ItemIndex)+']'+ RadioGroup1.Items[RadioGroup1.ItemIndex]);end;
http://blog.chinaunix.net/uid-20564848-id-74480.html
相关阅读 >>
Delphi 一组数据,按由大到小进行排序,并输出最大值与最小值
更多相关阅读请进入《Delphi》频道 >>