问答文章1 问答文章501 问答文章1001 问答文章1501 问答文章2001 问答文章2501 问答文章3001 问答文章3501 问答文章4001 问答文章4501 问答文章5001 问答文章5501 问答文章6001 问答文章6501 问答文章7001 问答文章7501 问答文章8001 问答文章8501 问答文章9001 问答文章9501

delphi RadioGroup里怎么添加单选按钮啊11

发布网友 发布时间:2023-10-13 23:44

我来回答

2个回答

热心网友 时间:2024-11-15 21:45

呵呵,那显然是错误的。
设置RadioGroup的Items属性,加上几个字符串即可,设置Columns属性,决定其显示几列

或者试试把这两行代码加到form.oncreate句柄中
radioGroup.Items.Commatext:='按钮1,按钮2,按钮3';
radioGroup.columns:=2;
就看到效果了

热心网友 时间:2024-11-15 21:45

先中后,点RadioGroup测试按钮,可在标题栏显示选择结果,点清除可以清除选择。
下面上代码,main.xml:

<RadioGroup
android:layout_width="fill_parent"
android:layout_height="wrap_content"
android:orientation="vertical"
android:checkedButton="@+id/b1"
android:id="@+id/RG">
<!--默认选中b1-->
<RadioButton
android:text="1"
android:id="@+id/b1"
/>
<RadioButton
android:text="2"
android:id="@+id/b2"
/>
<RadioButton
android:text="3"
android:id="@+id/b3"
/>
</RadioGroup>
<Button
android:layout_width="fill_parent"
android:layout_height="wrap_content"
android:id="@+id/show"
android:text="RadioGroup测试"
/>
<Button
android:layout_width="fill_parent"
android:layout_height="wrap_content"
android:id="@+id/clear"
android:text="清除"
/>

程序代码:

package com.pocketdigi;

import android.app.Activity;
import android.os.Bundle;
import android.view.View;
import android.view.View.OnClickListener;
import android.widget.Button;
import android.widget.RadioButton;
import android.widget.RadioGroup;

public class main extends Activity {
/** Called when the activity is first created. */
@Override
public void onCreate(Bundle savedInstanceState) {
super.onCreate(savedInstanceState);
setTitle("RadioGroup测试");
setContentView(R.layout.main);
RGDemo();
}
RadioGroup rg;
RadioButton b1;
RadioButton b2;
RadioButton b3;
public void RGDemo(){
rg=(RadioGroup)findViewById(R.id.RG);
b1=(RadioButton)findViewById(R.id.b1);
b2=(RadioButton)findViewById(R.id.b2);
b3=(RadioButton)findViewById(R.id.b3);
Button clr=(Button)findViewById(R.id.clear);
clr.setOnClickListener(clear);
Button echo=(Button)findViewById(R.id.show);
echo.setOnClickListener(show);
}
private Button.OnClickListener clear=new OnClickListener(){

@Override
public void onClick(View v) {
// TODO Auto-generated method stub
rg.clearCheck();
setTitle("RadioGroup测试");
}

};
private OnClickListener show=new OnClickListener(){

@Override
public void onClick(View v) {
// TODO Auto-generated method stub
if(b1.isChecked()){
setTitle("1");
}
if(b2.isChecked()){
setTitle("2");
}
if(b3.isChecked()){
setTitle("3");
}
}

};
}

RadioGroup有一个onCheckChangeListener*,可以通过*的onCheckedChanged方法捕捉到点击事件,onCheckedChanged方法会传入一个int型的checkedId,可以通过对比传入的checkedId和RadioButton的ID,来确定被点中的选项.

rg.setOnCheckedChangeListener(new OnCheckedChangeListener(){

@Override
public void onCheckedChanged(RadioGroup group, int checkedId) {
// TODO Auto-generated method stub
if(checkedId==b1.getId()){
Toast.makeText(main.this,"b1选中", Toast.LENGTH_LONG).show();
}
if(checkedId==b2.getId()){
Toast.makeText(main.this,"b2选中", Toast.LENGTH_LONG).show();
}
if(checkedId==b3.getId()){
Toast.makeText(main.this,"b3选中", Toast.LENGTH_LONG).show();
}

}

});
声明声明:本网页内容为用户发布,旨在传播知识,不代表本网认同其观点,若有侵权等问题请及时与本网联系,我们将在第一时间删除处理。E-MAIL:11247931@qq.com
说课包括哪些方面 说课内容包括()。 如何在手机百度上删除对话记录? 结核病是什么样的疾病? 曹丕17岁得了肺痨,明知自己命不长久,还要强争王位,是不是很自私呢?_百... 古代小说常出现的病名 急求一篇"生活小窍门"(500字)的作文 至今最有什么小妙招 健康的戒烟方法 笔记本电池锁死是什么原因引起的? android RadioGroup分成两排,每行两个显示,...5 ...告诉了诈骗的人,后来微信被盗号了,应该怎么办? 中石化的加油卡在加油站加油能优惠吗?3 如果一个男生真的很喜欢一个女生他会怎么做?231 女朋友体质偏寒,想给她买品鉴礼尚燕窝补补身体,不知道可不可以? 请问4S店提车交了一万定金,有现车,余款让打过去,才可以开发票,办理保 ... iphone4 4.3.5版本如何降级越狱 要详细 请问苹果手机非越狱版怎么下载圣地安列斯cleo 请详细说一下... 请问国家明确规定禁用PPR管作为给水管的相关规定?6 联通iphone4没有越狱游戏在哪里下啊!怎么倒进手机啊!希... 有哪些神话故事的故事情节是一样的 天然高分子材料有哪些 低头做俯卧撑和抬头做有什么区别5 东北杨树林内发现白蘑菇,是致命白毒伞吗?7 无心法师无心怎么被岳琦罗砍掉脑袋的10 无心法师上面岳琦罗的发饰叫什么?求解 无心法师里的岳琦罗是什么身份,是鬼还是魅? 帮我用谐音翻译一下数字吧 530,0935,519130,0...2 你好,在吗,我能问您一个问题吗?我这边有一个谐音,您能帮我翻... 短道速滑技术包括哪些2 求电影 老男孩之猛龙过江 高清百度云资源 速度轮滑运动的双蹬技术是直道滑行技术的一种.这种滑法比较适合...1 速滑直道技术动作的要领和练习方法105 什么样的领导会把员工用成废物? 新手机号码怎样申请558 如何用新的手机号注册 换个怎么更换?10 帮忙看下申通快递到哪了。大概还要多久啊。 求帮忙看看申通快递是空运还是陆运,大约什么时候能到!单号 2... 申通快递要多久?下午能到吗 点痣七天了,电针点的,不是很大的痣,结痂七天了不小心弄掉了里面还有类似... 求这个小玩具的淘宝购买地址 ,还想知道这玩具叫什么名字 申通快递 大概什么时候到!2 有用过柯达M550相机的帮帮我吧 塑料变形是怎么造成的? 如何塑料易拉罐的使用寿命?2 下行沟通、上行沟通、平等沟通三种组织沟通方式是如何互为补充并...9 面试官给的评价是优势是沟通表达,专业技能需提升,怎么看待这个... 初中毕业生学什么专业比较好就业? 当一个男生真正喜欢上一个女生的时候,会怎么做?