急！！！请问怎么实现通过一个按钮按下来控制另一个按钮弹起，谢谢！

2009-09-17 09:56:59 657 阅读 AI 写同款 · GEO 优化AI 选题数据监测一键分发 ›

用C语言实现按钮新技术一、按钮显示原理按钮一般有按下和弹起两种状态,在3D studio中按钮也有这两种状态,Windows中虽然看到按钮虽是弹起的,但细心的用户不难发现,当选中按钮时,它有短暂的按下状态。实际上,它的原理很简单,其实是利用改变按钮边框的颜色引起人视觉上的错觉而达到立体效果,让人们感到屏幕上真有凸起和凹下的按钮一样,如下图:@@T5S11500.GIF;图1@@图1和图2给出了按钮两种状态和图示,图1为阅读详情

两个差不多的问题，请帮忙，谢谢！
1、首先按下一个按钮A凹下去，按下B时，A按钮弹起，但是B按钮不凹下去

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

...全文

一按钮事件调用另一按钮事件ASP.NET【C#】以前做过VB.NET的项目，调用另一事件的时候只要写:事件名（null,null），就可以了，没想到用C#编程语言开发的ASP.NET项目也是。以下是我做的练习项目供大学学习一下。图一如下：图二如下：以下是代码部分html设计代码：一按钮事件调用另一按钮事件ASP.NET【C#】一按钮事件调用另一按钮事件ASP.NET【C#】阅读详情

xrhone

Delphi 5,944 成员 262,941 内容

+ 关注 + 加入社区

切换为时间正序

yhcustc 2011-12-16

打赏
举报

a.Down := not b.Down

Harryfin 2009-09-18

打赏
举报

Rz的按钮也有GroupIndex属性，不一定用SpeedButton

imho888 2009-09-18

打赏
举报



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;

xrhone 2009-09-17

打赏
举报

直接写成下面这种是不行的，我试过。
按钮a事件里 a.down:=true;
按钮b事件里 a.down:=false; b.down:=false;

haitao 2009-09-17

打赏
举报

[Quote=引用 6 楼 xrhone 的回复:]
我的程序不适合用bevel

其实最主要的是要解决第一个问题：“首先按下一个按钮A凹下去，按下B时，A按钮弹起，但是B按钮不凹下去”

就是要用B按钮来通过代码控制A按钮弹起。

请帮忙看看，谢谢！
[/Quote]
不要设groupid，
按钮a事件里 a.down:=true;
按钮b事件里 a.down:=false; b.down:=false;

xrhone 2009-09-17

打赏
举报

我的程序不适合用bevel

其实最主要的是要解决第一个问题：“首先按下一个按钮A凹下去，按下B时，A按钮弹起，但是B按钮不凹下去”

就是要用B按钮来通过代码控制A按钮弹起。

请帮忙看看，谢谢！

caixiaobai08 2009-09-17

打赏
举报

haitao 2009-09-17

打赏
举报

[Quote=引用 3 楼 xrhone 的回复:]
我是用的Tspeedbutton，但是group只能是在同一panel中有效，在不同的panel中无效
[/Quote]

哦，这倒没注意，d7的帮助没说。。。。。。。。
Allows speed buttons to work together as a group.

Delphi syntax:

property GroupIndex: Integer;

C++ syntax:

__property int GroupIndex = {read=FGroupIndex, write=SetGroupIndex, default=0};

Description

Set GroupIndex to determine how the button behaves when clicked.

When GroupIndex is 0, the button behaves independently of all other buttons on the form. When the user clicks such a speed button, the button appears pressed (in its clicked state) and then returns to its normal up state when the user releases the mouse button.

When GroupIndex is greater than 0, the button remains selected (in its down state) when clicked by the user. When the user clicks a selected button, it returns to the up state, unless Caption is false. Setting the GroupIndex property of a single speed button to a value greater than 0 causes the button to behave as a two-state button when Caption is true.

Speed buttons with the same GroupIndex property value (other than 0), work together as a group. When the user clicks one of these buttons, it remains selected until the user clicks another speed button belonging to the same group. Speed buttons used in this way can present mutually exclusive choices to the user.

把panel改为bevel呢？

xrhone 2009-09-17

打赏
举报

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

haitao 2009-09-17

打赏
举报

哦，Tspeedbutton才有groupid

haitao 2009-09-17

打赏
举报

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

急！！！请问怎么实现通过一个按钮按下来控制另一个按钮弹起，谢谢！

相关推荐