更改 Rebol 按钮的颜色

Question

我想在 Rebol 中提出多项选择题。可能的答案将在按钮上。我想在单击按钮时将其变为红色 并且 这是错误的答案。当按下正确的按钮时，我想继续下一个问题。

我可以改变盒子的颜色（mybox/color: red show mybox）。我可以使用两种颜色设置切换（但我不能根据任意测试的结果来更改它（答案是否正确？）。

似乎有一种简单的方法可以更改按钮的颜色，而无需创建我自己的类似按钮的面部对象。没有吗？

Answer 1

这是你想要的吗？按钮以红色开始。左键变蓝，右键变绿：

unview/all
view layout [
   my-btn: button 200x50 "left click or right click to change color" red effect []
       [my-btn/color: blue  show my-btn]  ;; effect of left click
       [my-btn/color: green show my-btn]  ;; effect of right click
  ]

您可以在样式中定义它，以便任何其他按钮都可以继承该行为。