我想,Radiobutton 选中时,Label1, Combox1 这两个组件显示内容,不被选中时,这两个组件,隐藏起来?
请问大虾们
我该怎么设置,怎么写代码?
Delphi RadioButton 按钮
答案:2 悬赏:30
解决时间 2021-04-08 04:34
- 提问者网友:娇妻失忆
- 2021-04-07 04:03
最佳答案
- 二级知识专家网友:woshuo
- 2021-04-07 04:10
你可以在你所有Radiobutton 的点击事件里加上:
procedure TForm1.RadioButton1Click(Sender: TObject);
begin
label1.Visible := RadioButton1.Checked;
ComboBox1.Visible := RadioButton1.Checked;
end;
procedure TForm1.RadioButton2Click(Sender: TObject);
begin
label1.Visible := RadioButton1.Checked;
ComboBox1.Visible := RadioButton1.Checked;
end;
procedure TForm1.RadioButton1Click(Sender: TObject);
begin
label1.Visible := RadioButton1.Checked;
ComboBox1.Visible := RadioButton1.Checked;
end;
procedure TForm1.RadioButton2Click(Sender: TObject);
begin
label1.Visible := RadioButton1.Checked;
ComboBox1.Visible := RadioButton1.Checked;
end;
全部回答
- 1楼网友:我颠覆世界
- 2021-04-07 05:40
我推荐你使用 standard 中的 radiogroup 在items 中设置每个项目的 名称 而确认哪个单选项的选中则使用 itemindex 属性 比如第一个选项 则 itemindex 为0 其它以此类推。然后在button1check 事件中 只需将 radiogroup 中的itemindex 属性 设置为-1 即可完成重置。 无需一个一个地设置radiobutton 的check属性. 如果楼主坚持使用 radiobutton的话 就如楼上所言。
我要举报
如以上问答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
推荐资讯