急！！！请问怎么实现通过一个按钮按下来控制另一个按钮弹起，谢谢！
两个差不多的问题，请帮忙，谢谢！
1、首先按下一个按钮A凹下去，按下B时，A按钮弹起，但是B按钮不凹下去

2、当两个按钮不在同一个panel中时，怎么实现按下A按钮时，A按钮凹进去，按下B按钮时，A按钮弹起，B按钮凹进去！





[解决办法]
如果按钮有group属性，可以自动有这样的功能的：同一group的按钮，同时只会有一个是陷下去的
[解决办法]

探讨

我是用的Tspeedbutton，但是group只能是在同一panel中有效，在不同的panel中无效

[解决办法]
o
[解决办法]
Rz的按钮也有GroupIndex属性，不一定用SpeedButton
[解决办法]

Delphi(Pascal) code

procedure TForm1.RzButton1Click(Sender: TObject);begin    RzButton1.GroupIndex:= 1;    RzButton1.Down:= true;end;procedure TForm1.RzButton2Click(Sender: TObject);begin    RzButton1.GroupIndex:= 0;    RzButton1.Down:= false;end;