| Class TRealAlarm (unit ralarm) |
TComponent
| Constructors |
constructor Create(AOwner: TComponent);| Functions |
destructor Destroy;
procedure RunAlarm(Sender: TObject);
procedure SetActive(State: Boolean);
procedure SetAlarmTime(Tm: string);| Properties |
property Active : Boolean
property AlarmTime : string
property ShowObject : TControl| Events |
event OnAlarm : TNotifyEvent| Variables |
FActive : Boolean;
FAlarmTime : string;
FHour : Word;
FMin : Word;
FMlSec : Word;
FOnAlarm : TNotifyEvent;
FSec : Word;
FShowObject : TControl;
FTimer : TTimer;| Constructors |
constructor Create(AOwner: TComponent);| Functions |
destructor Destroy;
procedure RunAlarm(Sender: TObject);
procedure SetActive(State: Boolean);
procedure SetAlarmTime(Tm: string);| Properties |
property Active : Boolean
property AlarmTime : string
property ShowObject : TControl| Events |
event OnAlarm : TNotifyEvent| Variables |
FActive : Boolean;
FAlarmTime : string;
FHour : Word;
FMin : Word;
FMlSec : Word;
FOnAlarm : TNotifyEvent;
FSec : Word;
FShowObject : TControl;
FTimer : TTimer;