如果Delphi TSpeedButton是该组中唯一的一个,它将如何保持按下状态

我不确定为什么TSpeedButton具有此属性,但是当TSpeedButton是给定groupindex的唯一按钮时,无论是否按下"AllowAllUp",它都不会保持按下状态.也许绝地控制就足够了,但希望有一些解决办法.任何帮助或轶事都表示赞赏.

顺便说一下,我(仍)使用Delphi 7,不确定这是否是一个全面的难题.

我这里没有D7,但是在D2006中,如果GroupIndex的值> 0,则Speedbutton会保持不变.

如果这不是您希望的行为,您可以在OnClick-Eventhandler中手动设置Down属性(确保GroupIndex为0).

我刚刚在Delphi 7(Build 4.453)中尝试过:

创建新的应用程序

添加TSpeedButton到表单

组 AllowAllUp := true;

组 GroupIndex := 1;

运行应用程序

单击按钮时,它会切换其向下状态,而不需要任何其他代码.