How to make a Delphi TSpeedButton stay pressed if it's the only one in the group

后端 未结 11 2121
既然无缘
既然无缘 2021-01-04 12:13

I\'m not sure why the TSpeedButton has this property but when a TSpeedButton is the only button of a given groupindex, it doesn\'t stay pressed, whether or not \"AllowAllUp\

11条回答
  •  醉酒成梦
    2021-01-04 12:46

    Set AllowAllup to true, and Down to false.

    Then in OnClick event:

    ....
    btn.AllowAllUp := not btn.AllowAllUp;
    btn.Down       := not btn.Down;
    ....
    

提交回复
热议问题