home *** CD-ROM | disk | FTP | other *** search
- object frmChange: TfrmChange
- Left = 291
- Top = 267
- BorderIcons = [biSystemMenu]
- BorderStyle = bsDialog
- Caption = 'Change Scan Dates'
- ClientHeight = 260
- ClientWidth = 360
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Position = poScreenCenter
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object Label11: TLabel
- Left = 8
- Top = 207
- Width = 79
- Height = 13
- Caption = 'Next Scan &Date:'
- end
- object Label10: TLabel
- Left = 8
- Top = 235
- Width = 79
- Height = 13
- Caption = 'Next Scan &Time:'
- end
- object Image1: TImage
- Left = 12
- Top = 4
- Width = 33
- Height = 37
- Picture.Data = {<image000.ico>}
- end
- object Label3: TLabel
- Left = 91
- Top = 8
- Width = 106
- Height = 13
- Caption = 'Next Processing Date:'
- end
- object lblDateRead: TLabel
- Left = 89
- Top = 28
- Width = 188
- Height = 13
- AutoSize = False
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Button3: TButton
- Left = 202
- Top = 229
- Width = 75
- Height = 23
- Caption = 'OK'
- Default = True
- ModalResult = 1
- TabOrder = 5
- end
- object Button2: TButton
- Left = 282
- Top = 229
- Width = 75
- Height = 23
- Cancel = True
- Caption = 'Cancel'
- ModalResult = 2
- TabOrder = 6
- end
- object Button4: TButton
- Left = 103
- Top = 160
- Width = 33
- Height = 21
- Caption = '<<Y'
- TabOrder = 0
- OnClick = Button4Click
- end
- object Button5: TButton
- Left = 136
- Top = 160
- Width = 33
- Height = 21
- Caption = '<M'
- TabOrder = 1
- OnClick = Button5Click
- end
- object Button7: TButton
- Left = 170
- Top = 160
- Width = 57
- Height = 21
- Caption = 'Today'
- TabOrder = 2
- OnClick = Button7Click
- end
- object Button6: TButton
- Left = 228
- Top = 160
- Width = 32
- Height = 21
- Caption = 'M>'
- TabOrder = 3
- OnClick = Button6Click
- end
- object Button8: TButton
- Left = 260
- Top = 160
- Width = 33
- Height = 21
- Caption = 'Y>>'
- TabOrder = 4
- OnClick = Button8Click
- end
- object edtNDate: TEdit
- Left = 96
- Top = 200
- Width = 73
- Height = 21
- TabOrder = 8
- end
- object edtNTime: TEdit
- Left = 96
- Top = 228
- Width = 73
- Height = 21
- TabOrder = 7
- end
- object cal: TCalendar
- Left = 92
- Top = 52
- Width = 213
- Height = 109
- Color = clInfoBk
- StartOfWeek = 0
- TabOrder = 9
- UseCurrentDate = False
- OnChange = calChange
- end
- end
-