Upload files to ''
The SetAlarm.pas file contains general purpose routines: pocedure ErrorMessageDialog; - creates a new notification window about invalid data format. procedure NewMessageDialog; - creates a new notification window about the expiration of time; procedure SetAlarmClock; - processes user input; procedure NewDialog; - creates an interface (a new window with fields for input and buttons for control). procedure InitMenuBar; virtual; - creates the top menu; procedure HandleEvent (var Event: TEvent); virtual; - processes the main events; procedure HandleEvent (var Event: TEvent); virtual; - event handler for the OK button; And it also contains unit Check.pas to check the entered data.
This commit is contained in:
parent
530c1a2ff4
commit
ec6813c373