Delphi Pages Forums

Delphi Pages Forums (http://www.delphipages.com/forum/index.php)
-   General (http://www.delphipages.com/forum/forumdisplay.php?f=2)
-   -   [SOLVED] onclick button stay down or up (http://www.delphipages.com/forum/showthread.php?t=218678)

FreakaZoid2 05-28-2019 03:58 PM

onclick button stay down or up
 
using speed buttons and wanting to be able to click the button and it stay down. if i click it again i want it to stay up. multiple speed buttons

i cant remember the logic for flipping the button up/down each time it is clicked.

rojam 05-28-2019 04:41 PM

if you want a group of buttons to work in concert then lookup the speedbutton's GroupIndex property, if you simply want a button to toggle down or up every time the user clicks it, then just toggle the speedbutton's down property in its OnClick handler.
Code:

procedure TFomr1.SpeedButtonClick(Sender: TObject);
begin
  (Sender as TSpeedButton).Down := Not ((Sender as TSpeedButton).Down);
end;

with casting Sender as TSpeedButton, you can use this same method for all speedbutton's that you would like to toggle.

***This code with only work if Sender is a TSpeedButton, else it is likely to crash.


All times are GMT. The time now is 08:37 PM.

Powered by vBulletin® Version 3.8.8
Copyright ©2000 - 2019, vBulletin Solutions, Inc.