home *** CD-ROM | disk | FTP | other *** search
- object MercyForm: TMercyForm
- Left = 408
- Top = 149
- Width = 472
- Height = 430
- HelpContext = 10
- Caption = 'Mercy rescheduling'
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -15
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- OldCreateOrder = True
- Position = poScreenCenter
- ShowHint = True
- OnCreate = FormCreate
- PixelsPerInch = 120
- TextHeight = 16
- object Bevel1: TBevel
- Left = 7
- Top = 59
- Width = 450
- Height = 158
- end
- object Label1: TLabel
- Left = 15
- Top = 8
- Width = 106
- Height = 16
- Hint = 'Number of outstanding items scheduled for repetition'
- Caption = 'Outstanding items'
- end
- object Label2: TLabel
- Left = 15
- Top = 72
- Width = 146
- Height = 16
- Hint = 'Number of items to repeat per day in the rescheduling period'
- Caption = '&Number of items per day'
- FocusControl = Items
- end
- object Label3: TLabel
- Left = 15
- Top = 98
- Width = 125
- Height = 16
- Hint = 'Length of the rescheduling period'
- Caption = '&Rescheduling period'
- FocusControl = Resched
- end
- object GatherLabel: TLabel
- Left = 15
- Top = 124
- Width = 100
- Height = 16
- Hint =
- 'Length of the gathering period (editable only on considering fut' +
- 'ure repetitions)'
- Caption = '&Gathering period'
- FocusControl = Gather
- end
- object Label5: TLabel
- Left = 15
- Top = 28
- Width = 116
- Height = 16
- Hint = 'Number of items that will be rescheduled'
- Caption = 'Items to reschedule'
- end
- object OutstandingLabel: TLabel
- Left = 236
- Top = 8
- Width = 7
- Height = 16
- Hint = 'Number of outstanding items scheduled for repetition'
- Caption = '0'
- end
- object Affected: TLabel
- Left = 236
- Top = 28
- Width = 7
- Height = 16
- Hint = 'Number of items that will be rescheduled'
- Caption = '0'
- end
- object TodayDate: TLabel
- Left = 334
- Top = 8
- Width = 76
- Height = 16
- Hint = 'Current date'
- Caption = 'Dec 29, 2002'
- end
- object ReschedDate: TLabel
- Left = 334
- Top = 98
- Width = 76
- Height = 16
- Hint = 'Date on which rescheduling period ends'
- Caption = 'Dec 29, 2002'
- end
- object GatherDate: TLabel
- Left = 334
- Top = 124
- Width = 76
- Height = 16
- Hint = 'Date on which the gathering period ends'
- Caption = 'Dec 29, 2002'
- end
- object Items: TEdit
- Left = 240
- Top = 69
- Width = 78
- Height = 24
- Hint = 'Number of items to repeat per day in the rescheduling period'
- TabOrder = 0
- Text = '1'
- OnEnter = ItemsEnter
- end
- object Resched: TEdit
- Left = 240
- Top = 94
- Width = 78
- Height = 24
- Hint = 'Length of the rescheduling period'
- TabOrder = 1
- Text = '1'
- OnEnter = ItemsEnter
- end
- object Gather: TEdit
- Left = 240
- Top = 120
- Width = 78
- Height = 24
- Hint =
- 'Length of the gathering period (editable only on considering fut' +
- 'ure repetitions)'
- TabOrder = 2
- Text = '1'
- OnEnter = ItemsEnter
- end
- object FutureCheckBox: TCheckBox
- Left = 15
- Top = 162
- Width = 306
- Height = 22
- Hint =
- 'Allow the gathering period to be longer than the rescheduling pe' +
- 'riod to reschedule future repetitions (e.g. before vacation)'
- Caption = 'Consider &future repetitions'
- TabOrder = 3
- OnClick = FutureCheckBoxClick
- end
- object Panel1: TPanel
- Left = 7
- Top = 232
- Width = 450
- Height = 116
- TabOrder = 4
- object Label13: TLabel
- Left = 8
- Top = 11
- Width = 150
- Height = 16
- Caption = 'Choosing OK will result in:'
- ParentShowHint = False
- ShowHint = False
- end
- object rem1: TLabel
- Left = 8
- Top = 44
- Width = 245
- Height = 16
- Caption = 'Items collected from a gathering period of'
- ParentShowHint = False
- ShowHint = False
- end
- object rem2: TLabel
- Left = 8
- Top = 64
- Width = 274
- Height = 16
- Caption = '1 day(s) will be rescheduled in the period up to'
- ParentShowHint = False
- ShowHint = False
- end
- object rem3: TLabel
- Left = 8
- Top = 84
- Width = 219
- Height = 16
- Caption = '01.01.1980 with 1 repetition(s) per day'
- ParentShowHint = False
- ShowHint = False
- end
- end
- object ReportBox: TCheckBox
- Left = 15
- Top = 184
- Width = 306
- Height = 22
- Hint =
- 'Generate a text file with the report on the progres of reschedul' +
- 'ing'
- Caption = 'Generate re&port'
- TabOrder = 5
- end
- object BitBtn1: TBitBtn
- Left = 62
- Top = 360
- Width = 94
- Height = 30
- Hint = 'Begin rescheduling'
- Caption = '&OK'
- TabOrder = 6
- OnClick = OKClick
- Glyph.Data = {
- BE060000424DBE06000000000000360400002800000024000000120000000100
- 0800000000008802000000000000000000000001000000010000000000000000
- 80000080000000808000800000008000800080800000C0C0C0007060A000B8B0
- D000000000000000000000000000000000000000000000000000000000000000
- 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
- 000000000000000000000000000000000000E0D8E800A4A0A000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00030303030303
- 0303030303030303030303030303030303030303030303030303030303030303
- 03030303030303030303030303030303030303030303FF030303030303030303
- 03030303030303040403030303030303030303030303030303F8F8FF03030303
- 03030303030303030303040202040303030303030303030303030303F80303F8
- FF030303030303030303030303040202020204030303030303030303030303F8
- 03030303F8FF0303030303030303030304020202020202040303030303030303
- 0303F8030303030303F8FF030303030303030304020202FA0202020204030303
- 0303030303F8FF0303F8FF030303F8FF03030303030303020202FA03FA020202
- 040303030303030303F8FF03F803F8FF0303F8FF03030303030303FA02FA0303
- 03FA0202020403030303030303F8FFF8030303F8FF0303F8FF03030303030303
- FA0303030303FA0202020403030303030303F80303030303F8FF0303F8FF0303
- 0303030303030303030303FA0202020403030303030303030303030303F8FF03
- 03F8FF03030303030303030303030303FA020202040303030303030303030303
- 0303F8FF0303F8FF03030303030303030303030303FA02020204030303030303
- 03030303030303F8FF0303F8FF03030303030303030303030303FA0202020403
- 030303030303030303030303F8FF0303F8FF03030303030303030303030303FA
- 0202040303030303030303030303030303F8FF03F8FF03030303030303030303
- 03030303FA0202030303030303030303030303030303F8FFF803030303030303
- 030303030303030303FA0303030303030303030303030303030303F803030303
- 0303030303030303030303030303030303030303030303030303030303030303
- 0303}
- Margin = 5
- NumGlyphs = 2
- Spacing = 6
- end
- object BitBtn2: TBitBtn
- Left = 162
- Top = 360
- Width = 94
- Height = 30
- Hint = 'Cancel rescheduling'
- TabOrder = 7
- Kind = bkCancel
- Margin = 5
- Spacing = 6
- end
- object UpdateButton: TBitBtn
- Left = 263
- Top = 360
- Width = 94
- Height = 30
- Hint = 'Compute new parameters from the current input data'
- Caption = '&Update'
- Default = True
- TabOrder = 8
- OnClick = UpdateButtonClick
- Glyph.Data = {
- BE060000424DBE06000000000000360400002800000024000000120000000100
- 0800000000008802000000000000000000000001000000010000000000000000
- 80000080000000808000800000008000800080800000C0C0C0007060A000B8B0
- D000000000000000000000000000000000000000000000000000000000000000
- 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
- 000000000000000000000000000000000000E0D8E800A4A0A000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00030303030303
- 0404040404040303030303030303030303FFF8F8F8F8F8F803FF030303030302
- 0403030402020202020204040303030303F8F8FF03F8030303030303F8F8FF03
- 030303020204040202020202020202020403030303F8FFF8F80303FFFFFFFFFF
- 0303F8FF030303020202020202FAFAFAFAFA02020204030303F8FF030303FFF8
- F8F8F8F8FF0303F8FF03030202020202FA0303030303FA020202040303F8FF03
- 03FFF80303030303F8FF0303F8FF03020202020203030303030303FA02020403
- 03F8FF0303F803030303030303F8FF03F8FF03020202020202030303030303FA
- 0404040303F8FFFFFFFFF8FF0303030303F8F8F8F80303FAFAFAFAFAFAFA0303
- 030303030303030303F8F8F8F8F8F8F803030303030303030303030303030303
- 030303030303030303030303030303030303030303030303FFFFFFFFFFFF0303
- 030303030303030303030404040404040303FFFFFFFF030303030303F8F8F8F8
- F8F803FA040404030303030303FA02020202020403F8F8F8F8FF0303030303F8
- FF03030303F803FA02020403030303030303FA020202020403F8FF03F8FF0303
- 03030303F803030303F80303FA0202040303030303040402020202040303F803
- 03F8FFFFFFFFFFF8F803030303F80303FA020202040404040402020202020204
- 0303F8FF0303F8F8F8F8F8030303FFFF03F8030303FA02020202020202020202
- FAFA0204030303F8FFFF030303030303FFFFF8F8FFF803030303FAFA02020202
- 0202FAFA0303FA0303030303F8F8FFFFFFFFFFFFF8F80303F803030303030303
- FAFAFAFAFAFA030303030303030303030303F8F8F8F8F8F80303030303030303
- 0303030303030303030303030303030303030303030303030303030303030303
- 0303}
- Margin = 5
- NumGlyphs = 2
- Spacing = 6
- end
- object BitBtn4: TBitBtn
- Left = 363
- Top = 360
- Width = 94
- Height = 30
- TabOrder = 9
- Kind = bkHelp
- Margin = 5
- Spacing = 6
- end
- object Button1: TButton
- Left = 336
- Top = 176
- Width = 105
- Height = 30
- Hint = 'Define rescheduling criteria for Mercy'
- Caption = '&Criteria'
- TabOrder = 10
- OnClick = Button1Click
- end
- end
-