home *** CD-ROM | disk | FTP | other *** search
- object SchedEvForm: TSchedEvForm
- Tag = -1
- Left = 236
- Top = 93
- BorderIcons = []
- BorderStyle = bsDialog
- Caption = 'xxx'
- ClientHeight = 251
- ClientWidth = 446
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = 'Arial'
- Font.Style = []
- KeyPreview = True
- Position = poScreenCenter
- ShowHint = True
- OnClose = FormClose
- OnCloseQuery = FormCloseQuery
- OnCreate = FormCreate
- OnKeyDown = FormKeyDown
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 15
- object MainGroupBox: TGroupBox
- Left = 0
- Top = 0
- Width = 446
- Height = 199
- Color = clBtnFace
- ParentColor = False
- TabOrder = 3
- object TabbedNotebook1: TTabbedNotebook
- Left = 8
- Top = 14
- Width = 429
- Height = 175
- Hint = 'You can use <Page Up> and <Page Down> to change pages'
- TabFont.Color = clBtnText
- TabFont.Height = -12
- TabFont.Name = 'Arial'
- TabFont.Style = []
- TabOrder = 0
- object TTabPage
- Left = 4
- Top = 26
- Caption = 'xxx'
- object StartUpDirLabel: TLabel
- Left = 4
- Top = 124
- Width = 69
- Height = 14
- Caption = 'Startup Dir:'
- ParentShowHint = False
- ShowHint = False
- end
- object StartUpDirTextLabel: TLabel
- Left = 84
- Top = 124
- Width = 329
- Height = 14
- Hint =
- 'This is where any file input/output will occur, when file starts' +
- ' up'
- AutoSize = False
- Caption = 'xxx'
- end
- object FileNameButton: TButton
- Left = 4
- Top = 8
- Width = 137
- Height = 21
- Hint = 'Choose any available file to run'
- Caption = 'Browse Files...'
- TabOrder = 1
- OnClick = FileNameButtonClick
- OnExit = TextMemoExit
- end
- object StartUpDirButton: TButton
- Left = 144
- Top = 8
- Width = 157
- Height = 21
- Hint = 'Make any directory the startup directory'
- Caption = 'Change Startup Dir...'
- TabOrder = 2
- OnClick = StartUpDirButtonClick
- end
- object ConfirmCheckBox: TCheckBox
- Left = 308
- Top = 8
- Width = 73
- Height = 25
- Hint = 'If checked, you can put off or skip the run'
- Caption = 'Confirm'
- TabOrder = 3
- OnClick = ConfirmCheckBoxClick
- end
- object TextMemo: TMemo
- Left = 4
- Top = 36
- Width = 413
- Height = 85
- ParentShowHint = False
- ShowHint = False
- TabOrder = 0
- OnChange = TextMemoChange
- OnExit = TextMemoExit
- OnKeyPress = TextMemoKeyPress
- end
- end
- object TTabPage
- Left = 4
- Top = 26
- HelpContext = 1
- Caption = 'Scheduling'
- object DateLabel: TLabel
- Left = 6
- Top = 11
- Width = 31
- Height = 13
- Caption = 'Date'
- ParentShowHint = False
- ShowHint = False
- end
- object TimeLabel: TLabel
- Left = 214
- Top = 11
- Width = 29
- Height = 13
- Caption = 'Time'
- ParentShowHint = False
- ShowHint = False
- end
- object UntilLabel: TLabel
- Left = 214
- Top = 36
- Width = 57
- Height = 14
- Caption = 'Until Date'
- ParentShowHint = False
- ShowHint = False
- end
- object RecurrLabel: TLabel
- Left = 6
- Top = 36
- Width = 79
- Height = 14
- Caption = 'Recurr Period'
- ParentShowHint = False
- ShowHint = False
- end
- object WarningLabel: TLabel
- Left = 6
- Top = 62
- Width = 91
- Height = 17
- Caption = 'Warning Period'
- ParentShowHint = False
- ShowHint = False
- end
- object ReservedLabel: TLabel
- Left = 216
- Top = 90
- Width = 97
- Height = 13
- Caption = 'Reserved Period'
- ParentShowHint = False
- ShowHint = False
- end
- object ConfirmTextLabel: TLabel
- Left = 4
- Top = 114
- Width = 413
- Height = 29
- Alignment = taCenter
- AutoSize = False
- Caption = 'xxxxxxxx'
- ParentShowHint = False
- ShowHint = False
- WordWrap = True
- end
- object WarningRecurrLabel: TLabel
- Left = 216
- Top = 62
- Width = 87
- Height = 17
- Caption = 'Warning Recurr'
- ParentShowHint = False
- ShowHint = False
- end
- object DateEdit: TEdit
- Left = 35
- Top = 8
- Width = 165
- Height = 23
- Hint = 'Day when event is to first appear'
- TabOrder = 0
- Text = 'tomorrow'
- OnChange = DateEditChange
- end
- object TimeEdit: TEdit
- Left = 244
- Top = 8
- Width = 173
- Height = 23
- Hint = 'Time when event is to appear'
- TabOrder = 1
- Text = 'startup'
- OnChange = TimeEditChange
- end
- object UntilEdit: TEdit
- Left = 272
- Top = 34
- Width = 145
- Height = 23
- Hint = 'Event will not appear again after this day'
- TabOrder = 3
- Text = 'none'
- OnChange = UntilEditChange
- end
- object RecurrEdit: TEdit
- Left = 90
- Top = 34
- Width = 110
- Height = 23
- Hint = 'How long between appearances of event'
- TabOrder = 2
- Text = 'none'
- OnChange = RecurrEditChange
- end
- object WarningEdit: TEdit
- Left = 97
- Top = 60
- Width = 103
- Height = 23
- Hint = 'Time between first warning and when event ocurrs'
- TabOrder = 4
- Text = 'none'
- OnChange = WarningEditChange
- end
- object ReservedEdit: TEdit
- Left = 315
- Top = 87
- Width = 104
- Height = 23
- Hint = 'Examples:2 weeks for a holiday, 2 hrs for a meetiing etc.'
- TabOrder = 6
- Text = 'none'
- OnChange = ReservedEditChange
- end
- object WarningRecurrEdit: TEdit
- Left = 309
- Top = 60
- Width = 110
- Height = 23
- Hint = 'Time between warnings, before event occurs'
- TabOrder = 5
- Text = 'none'
- OnChange = WarningRecurrEditChange
- end
- end
- object TTabPage
- Left = 4
- Top = 26
- HelpContext = 2
- Caption = 'Sound'
- object SoundPathLabel: TLabel
- Left = 8
- Top = 42
- Width = 59
- Height = 14
- Caption = 'File Name'
- ParentShowHint = False
- ShowHint = False
- end
- object CountLabel: TLabel
- Left = 8
- Top = 71
- Width = 39
- Height = 13
- Caption = 'Count'
- ParentShowHint = False
- ShowHint = False
- end
- object SoundVLabel: TLabel
- Left = 12
- Top = 104
- Width = 405
- Height = 29
- Alignment = taCenter
- AutoSize = False
- Caption = 'xxx'
- ParentShowHint = False
- ShowHint = False
- end
- object SpacingLabel: TLabel
- Left = 128
- Top = 71
- Width = 113
- Height = 18
- Caption = 'Spacing (millisecs.)'
- ParentShowHint = False
- ShowHint = False
- end
- object SoundCountEdit: TEdit
- Left = 48
- Top = 68
- Width = 25
- Height = 23
- Hint = 'Number of times to play sound'
- TabOrder = 5
- OnChange = SoundCountEditChange
- end
- object SoundPathEdit: TEdit
- Left = 72
- Top = 40
- Width = 217
- Height = 23
- Hint = 'Play this sound to announce event'
- TabOrder = 3
- OnChange = SoundPathEditChange
- end
- object SoundSpacingEdit: TEdit
- Left = 244
- Top = 68
- Width = 45
- Height = 23
- Hint = 'Length of silence between sounds'
- TabOrder = 6
- OnChange = SoundSpacingEditChange
- end
- object SoundPathButton: TButton
- Left = 300
- Top = 40
- Width = 119
- Height = 49
- Hint = 'Choose any available .wav file'
- Caption = 'Browse Files...'
- TabOrder = 4
- OnClick = SoundPathButtonClick
- end
- object SysBeepRadioButton: TRadioButton
- Left = 144
- Top = 10
- Width = 113
- Height = 17
- Caption = 'System beeps'
- ParentShowHint = False
- ShowHint = False
- TabOrder = 1
- TabStop = True
- OnClick = SysBeepRadioButtonClick
- end
- object NoSoundRadioButton: TRadioButton
- Left = 7
- Top = 10
- Width = 113
- Height = 17
- Caption = 'No sound'
- Checked = True
- ParentShowHint = False
- ShowHint = False
- TabOrder = 0
- TabStop = True
- OnClick = NoSoundRadioButtonClick
- end
- object SoundPathRadioButton: TRadioButton
- Left = 296
- Top = 10
- Width = 113
- Height = 17
- Caption = 'Play .wav file'
- ParentShowHint = False
- ShowHint = False
- TabOrder = 2
- TabStop = True
- OnClick = SoundPathRadioButtonClick
- end
- end
- end
- end
- object OKBitBtn: TBitBtn
- Left = 8
- Top = 206
- Width = 73
- Height = 41
- TabOrder = 0
- OnClick = OKBitBtnClick
- Kind = bkOK
- end
- object CancelBitBtn: TBitBtn
- Left = 88
- Top = 206
- Width = 79
- Height = 41
- TabOrder = 1
- OnClick = CancelBitBtnClick
- Kind = bkCancel
- end
- object DoAnotherBitBtn: TBitBtn
- Left = 173
- Top = 206
- Width = 128
- Height = 41
- Caption = 'OK, Do Another'
- ModalResult = 1
- TabOrder = 2
- OnClick = DoAnotherBitBtnClick
- Glyph.Data = {
- BE060000424DBE06000000000000360400002800000024000000120000000100
- 0800000000008802000000000000000000000000000000000000000000000000
- 80000080000000808000800000008000800080800000C0C0C00041BCBC00A0DE
- DE00000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D0EEEE00A4A0A000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00030303030303
- 0303030303030303030303030303030303030303030303030303030303030303
- 03030303030303030303030303030303030303030303FF030303030303030303
- 03030303030303040403030303030303030303030303030303F8F8FF03030303
- 03030303030303030303040202040303030303030303030303030303F80303F8
- FF030303030303030303030303040202020204030303030303030303030303F8
- 03030303F8FF0303030303030303030304020202020202040303030303030303
- 0303F8030303030303F8FF030303030303030304020202FA0202020204030303
- 0303030303F8FF0303F8FF030303F8FF03030303030303020202FA03FA020202
- 040303030303030303F8FF03F803F8FF0303F8FF03030303030303FA02FA0303
- 03FA0202020403030303030303F8FFF8030303F8FF0303F8FF03030303030303
- FA0303030303FA0202020403030303030303F80303030303F8FF0303F8FF0303
- 0303030303030303030303FA0202020403030303030303030303030303F8FF03
- 03F8FF03030303030303030303030303FA020202040303030303030303030303
- 0303F8FF0303F8FF03030303030303030303030303FA02020204030303030303
- 03030303030303F8FF0303F8FF03030303030303030303030303FA0202020403
- 030303030303030303030303F8FF0303F8FF03030303030303030303030303FA
- 0202040303030303030303030303030303F8FF03F8FF03030303030303030303
- 03030303FA0202030303030303030303030303030303F8FFF803030303030303
- 030303030303030303FA0303030303030303030303030303030303F803030303
- 0303030303030303030303030303030303030303030303030303030303030303
- 0303}
- NumGlyphs = 2
- end
- object BrowseDialog: TOpenDialog
- DefaultExt = 'exe'
- FileEditStyle = fsEdit
- Filter =
- 'All Files (*.*)|*.*|Program files (*.exe)|*.exe|Batch Files (*.b' +
- 'at)|*.bat|Word Documents (*.doc)|*.doc|Text Files (*.txt)|*.txt'
- FilterIndex = 2
- Options = [ofReadOnly, ofPathMustExist, ofFileMustExist]
- Title = 'Browse Files'
- Left = 368
- Top = 216
- end
- object SoundPathDialog: TOpenDialog
- FileEditStyle = fsEdit
- Filter = 'Sound Files (*.wav)|*.wav'
- Left = 408
- Top = 216
- end
- end
-