命令按钮组 - VFP论坛 - 编程论坛档案馆

已结贴√ 问题点数：5 回复次数：6

命令按钮组

新建一个命令按钮组，控制其中一个运行之后颜色与其他不同，然后任意点击哪个按钮，这个按钮就会变为单独一个颜色，而其他按钮都是另一种颜色。不知道这样说没说清楚，请教该如何做到上述情况？比如一个命令按钮组有5个按钮，设置第一个运行之后为红色，其他4个白色，然后点击任意一个按钮，这个按钮变为红色，其他4个则变为白色，代码该如何写？谢谢！

搜索更多相关主题的帖子: 如何　新建　

第 2 楼

得分:0

就是按钮的颜色设置问题

第 3 楼

得分:2

在第一个按钮的CLICK（）加入这段代码
this.backcolor=rgb(255,0,0)
(255,255,255)
(255,255,255)
(255,255,255)
其它的都差不多。

第 4 楼

得分:0

回复 2楼吹水佬

但是点击按钮后，按钮的颜色都要变化啊？只是单纯设置按钮颜色怎么使他变化呢？

第 5 楼

得分:0

回复 4楼初学者193

这些按钮初始化的颜色是什么呀，没明白

第 6 楼

得分:3

以下是引用初学者193在2017-3-13 16:03:53的发言：

新建一个命令按钮组，控制其中一个运行之后颜色与其他不同，然后任意点击哪个按钮，这个按钮就会变为单独一个颜色，而其他按钮都是另一种颜色。不知道这样说没说清楚，请教该如何做到上述情况？比如一个命令按钮组有5个按钮，设置第一个运行之后为红色，其他4个白色，然后点击任意一个按钮，这个按钮变为红色，其他4个则变为白色，代码该如何写？谢谢！

比如你命令组有4个命令,名称分别为 Command1,Command2,Command3,Command4
*在Command1.Click 中
this.ForeColor = RGB(0,0,255)
this. = RGB(0,0,0)
this. = RGB(0,0,0)
this. = RGB(0,0,0)

*在Command2.Click 中
this.ForeColor = RGB(0,0,255)
this. = RGB(0,0,0)
this. = RGB(0,0,0)
this. = RGB(0,0,0)

*在Command3.Click 中
this.ForeColor = RGB(0,0,255)
this. = RGB(0,0,0)
this. = RGB(0,0,0)
this. = RGB(0,0,0)

*在Command4.Click 中
this.ForeColor = RGB(0,0,255)
this. = RGB(0,0,0)
this. = RGB(0,0,0)
this. = RGB(0,0,0)

*在每个 Command1.init,Command2.init,Command3.init,Command4.init 中
this.ForeColor = RGB(0,0,0)

[此贴子已经被作者于2017-3-13 17:29编辑过]

第 7 楼

得分:0

明白了，多谢