Class TForm1 (unit Speedbtn)

Inherits from

TForm

Title : SpeedButton demo Function : Shows how speedbuttons can be kept down By: ing. S.P.Settels, e-mail: settels@pi.net delphi page: http://www.pi.net/~settels/delphi Solution : use the AllowAllUp property and make GroupIndex bigger than 1

Constructors



Functions

procedure SpeedButton4Click(Sender: TObject);


Properties

Events

Variables

Label1 : TLabel;


SpeedButton1 : TSpeedButton;


SpeedButton2 : TSpeedButton;


SpeedButton3 : TSpeedButton;


SpeedButton4 : TSpeedButton;



Constructors


Functions


procedure SpeedButton4Click(Sender: TObject);


Properties


Events


Variables


Label1 : TLabel;


SpeedButton1 : TSpeedButton;


SpeedButton2 : TSpeedButton;


SpeedButton3 : TSpeedButton;


SpeedButton4 : TSpeedButton;