| Class TfMsgDlg (unit Timedmsg) |
TForm
| Constructors |
| Functions |
procedure FormShow(Sender: TObject);
procedure TimerTimer(Sender: TObject);| Properties |
| Events |
| Variables |
Button : TBitBtn;
Glyph : TImage;
MsgLabel : TLabel;
SexLabel : TLabel;
Timer : TTimer;
AType : TTimedMsgDlgType;
Msg : String;
Seconds : Word;| Constructors |
| Functions |
procedure FormShow(Sender: TObject);
procedure TimerTimer(Sender: TObject);if required setup timer
| Properties |
| Events |
| Variables |
Button : TBitBtn;
Glyph : TImage;
MsgLabel : TLabel;
SexLabel : TLabel;
Timer : TTimer;
AType : TTimedMsgDlgType;
Msg : String;
Seconds : Word;