Class TForm1 (unit DemoMain)

Inherits from

TForm

Constructors



Functions

procedure ClearClick(Sender: TObject);

Normally, you'd just use something like mtInformation for this param

procedure ClearCustomClick(Sender: TObject);


procedure CustomClick(Sender: TObject);


procedure FormClearClick(Sender: TObject);


procedure FormClick(Sender: TObject);


procedure FormCreate(Sender: TObject);


procedure TestClick(Sender: TObject);


Properties

Events

Variables

Abort : TCheckBox;


Bevel1 : TBevel;


Bevel2 : TBevel;


Cancel : TCheckBox;


Clear : TButton;


ClearCustom : TButton;


Custom : TButton;


Form : TButton;


FormClear : TButton;


GroupBox1 : TGroupBox;


Help : TCheckBox;


Ignore : TCheckBox;


Label1 : TLabel;


Label2 : TLabel;


Label3 : TLabel;


Label4 : TLabel;


Label5 : TLabel;


MsgText : TMemo;


MsgType : TComboBox;


No : TCheckBox;


Ok : TCheckBox;


Retry : TCheckBox;


Test : TButton;


Yes : TCheckBox;



Constructors


Functions


procedure ClearClick(Sender: TObject);

Normally, you'd just use something like mtInformation for this param


procedure ClearCustomClick(Sender: TObject);


procedure CustomClick(Sender: TObject);


procedure FormClearClick(Sender: TObject);


procedure FormClick(Sender: TObject);


procedure FormCreate(Sender: TObject);


procedure TestClick(Sender: TObject);


Properties


Events


Variables


Abort : TCheckBox;


Bevel1 : TBevel;


Bevel2 : TBevel;


Cancel : TCheckBox;


Clear : TButton;


ClearCustom : TButton;


Custom : TButton;


Form : TButton;


FormClear : TButton;


GroupBox1 : TGroupBox;


Help : TCheckBox;


Ignore : TCheckBox;


Label1 : TLabel;


Label2 : TLabel;


Label3 : TLabel;


Label4 : TLabel;


Label5 : TLabel;


MsgText : TMemo;


MsgType : TComboBox;


No : TCheckBox;


Ok : TCheckBox;


Retry : TCheckBox;


Test : TButton;


Yes : TCheckBox;