Class TATStatusbar (unit ATStatusbar) |
TStatusBar
Constructors |
Functions |
So you don't have to wait 1 second
Properties |
Events |
Variables |
Constructors |
Functions |
Don't wait 1 second to display the time
allowing access to other controls, etc.
This one to update the language
So you don't have to wait 1 second
<\ So you don't have to wait 1 second ====================================================} { A resize is called after the object is created. } { If desired, the name can be set here. } { } { } {----------------------------------------------------} { } { If you don't want it automatically named } { "StatusBar", comment out the following line } { } {==================================================== BeepTime in MSec So you don't have to wait 1 second Timer Resize event Properties Events Variables procedure SetDLanguage(Value : TDayLanguage);
procedure SetDTime(Value : Boolean);
procedure SetInterval(Value : Integer);
procedure SetOnAlarm(Value: TNotifyEvent);
procedure SetOnTimer(Value: TNotifyEvent);
procedure SetPort(address, value: Word);
procedure SetProgress(Value : Integer);
procedure ShowDateTime;
procedure Sound(Freq: Word);
procedure UpdateTimer;
procedure WMSize(var Message: TWMSize);
procedure WndProc(var Msg: TMessage);
property Alarm : TAlarm
property AlarmTime : string
property AlarmType : TAlarmType
property Align :
property Beep : TBeep
property BeepFreq : Word
property BeepTime : Integer
property Cursor :
property DayLanguage : TDayLanguage
property DisplayDate : Boolean
property DisplayDay : Boolean
property DisplayTime : Boolean
property DragCursor :
property DragMode :
property Enabled :
property Font :
property Height :
property HelpContext :
property Hint :
property Interval : integer
property Left :
property Name :
property Panels :
property ParentFont :
property ParentShowHint :
property PopupMenu :
property Progress : Integer
property ProgressColor : TColor
property ShowHint :
property SimplePanel :
property SimpleText :
property SizeGrip :
property Tag :
property Top :
property Visible :
property Width :
property TimerID : TTimerID
event OnAlarm : TNotifyEvent
event OnClick :
event OnDblClick :
event OnDragDrop :
event OnDragOver :
event OnDrawPanel :
event OnEndDrag :
event OnMouseDown :
event OnMouseMove :
event OnMouseUp :
event OnResize : TNotifyEvent
event OnStartDrag :
event OnTimer : TNotifyEvent
FAlarm : TAlarm;
FAlarmTime : string;
FAlarmType : TAlarmType;
FBeep : TBeep;
FBeepFreq : Word;
FBeepTime : Integer;
FDayLanguage : TDayLanguage;
FDisplayDate : Boolean;
FDisplayDay : Boolean;
FDisplayTime : Boolean;
FInterval : integer;
FOnAlarm : TNotifyEvent;
FOnResize : TNotifyEvent;
FOnTimer : TNotifyEvent;
FProgress : Integer;
FProgresscolor : TColor;
FRing : Boolean;
FTimerID : integer;
FWindowHandle : HWND;