Class TForm1 (unit U_Demo3)

Inherits from

TForm

Constructors



Functions

procedure PicBtn1DrawFocus(Sender: TObject; aCanvas: TCanvas; var aRect: TRect);


procedure PicBtn2Click(Sender: TObject);


procedure PicBtn2Command(Sender: TObject);


procedure PicBtn2DrawFocus(Sender: TObject; aCanvas: TCanvas; var aRect: TRect);


procedure SpeedButton1Click(Sender: TObject);


Properties

Events

Variables

GroupBox1 : TGroupBox;


GroupBox2 : TGroupBox;


PicBtn1 : TPicBtn;


PicBtn2 : TPicBtn;


SpeedButton1 : TSpeedButton;



Constructors


Functions


procedure PicBtn1DrawFocus(Sender: TObject; aCanvas: TCanvas; var aRect: TRect);


procedure PicBtn2Click(Sender: TObject);


procedure PicBtn2Command(Sender: TObject);


procedure PicBtn2DrawFocus(Sender: TObject; aCanvas: TCanvas; var aRect: TRect);


procedure SpeedButton1Click(Sender: TObject);


Properties


Events


Variables


GroupBox1 : TGroupBox;


GroupBox2 : TGroupBox;


PicBtn1 : TPicBtn;


PicBtn2 : TPicBtn;


SpeedButton1 : TSpeedButton;