home *** CD-ROM | disk | FTP | other *** search
- object FAVCalendar: TFAVCalendar
- Left = 486
- Top = 141
- BorderIcons = [biHelp]
- BorderStyle = bsNone
- Caption = 'FAVCalendar'
- ClientHeight = 187
- ClientWidth = 203
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- KeyPreview = True
- OnClose = FormClose
- OnKeyDown = FormKeyDown
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object Image1: TImage
- Left = 0
- Top = 0
- Width = 203
- Height = 187
- Align = alClient
- Picture.Data = {<image000.bmp>}
- Stretch = True
- end
- object BtnLeftY: TSpeedButton
- Left = 7
- Top = 2
- Width = 23
- Height = 24
- Flat = True
- Glyph.Data = {
- F6000000424DF600000000000000760000002800000010000000100000000100
- 0400000000008000000000000000000000001000000010000000000000000000
- 8000008000000080800080000000800080008080000080808000C0C0C0000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
- 888888888888888888888888880788880788888880B07880B07888880BB0780B
- B0788880BB0780BB0788880BB0780BB0788880BB0780BB0788880BB0780BB078
- 888880BB0780BB078888880BB0780BB078888880BB0780BB078888880BB0780B
- B078888880B07880B07888888807888807888888888888888888}
- ParentShowHint = False
- ShowHint = True
- OnClick = BtnLeftYClick
- end
- object BtnLeftM: TSpeedButton
- Left = 31
- Top = 2
- Width = 23
- Height = 24
- Flat = True
- Glyph.Data = {
- F6000000424DF600000000000000760000002800000010000000100000000100
- 0400000000008000000000000000000000001000000010000000000000000000
- 8000008000000080800080000000800080008080000080808000C0C0C0000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
- 888888888888888888888888888880788888888888880B07888888888880BB07
- 88888888880BB0788888888880BB0788888888880BB0788888888880BB078888
- 888888880BB078888888888880BB078888888888880BB078888888888880BB07
- 8888888888880B07888888888888807888888888888888888888}
- ParentShowHint = False
- ShowHint = True
- OnClick = BtnLeftMClick
- end
- object BtnRightM: TSpeedButton
- Left = 141
- Top = 2
- Width = 23
- Height = 24
- Flat = True
- Glyph.Data = {
- F6000000424DF600000000000000760000002800000010000000100000000100
- 0400000000008000000000000000000000001000000010000000000000000000
- 8000008000000080800080000000800080008080000080808000C0C0C0000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
- 88888888888888888888888870788888888888880B078888888888880BB07888
- 8888888880BB078888888888880BB078888888888880BB078888888888880BB0
- 788888888880BB0788888888880BB0788888888880BB0788888888880BB07888
- 888888880B078888888888888078888888888888888888888888}
- ParentShowHint = False
- ShowHint = True
- OnClick = BtnRightMClick
- end
- object BtnRightY: TSpeedButton
- Left = 165
- Top = 2
- Width = 23
- Height = 24
- Flat = True
- Glyph.Data = {
- F6000000424DF600000000000000760000002800000010000000100000000100
- 0400000000008000000000000000000000001000000010000000000000000000
- 8000008000000080800080000000800080008080000080808000C0C0C0000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
- 88888888888888888888870788870788888880B07880B078888880BB0780BB07
- 8888880BB0780BB078888880BB0780BB078888880BB0780BB078888880BB0780
- BB0788880BB0780BB0788880BB0780BB0788880BB0780BB0788880BB0780BB07
- 888880B07880B078888888078888078888888888888888888888}
- ParentShowHint = False
- ShowHint = True
- OnClick = BtnRightYClick
- end
- object Label1: TLabel
- Left = 60
- Top = 7
- Width = 80
- Height = 18
- Alignment = taCenter
- AutoSize = False
- Caption = 'Label1'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- Transparent = True
- end
- object Label2: TLabel
- Left = 48
- Top = 154
- Width = 107
- Height = 16
- Alignment = taCenter
- AutoSize = False
- Caption = 'Label2'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- Transparent = True
- end
- object BtnOk: TSpeedButton
- Left = 170
- Top = 151
- Width = 25
- Height = 20
- Flat = True
- Glyph.Data = {
- F6000000424DF600000000000000760000002800000010000000100000000100
- 04000000000080000000330B0000330B00001000000010000000000000000000
- 8000008000000080800080000000800080008080000080808000C0C0C0000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
- 8888888887788888888888880077888888888880B00788888888880BBB077888
- 888800BBBBB0778888880BBBBBBB077888880BBB00BBB07788880BB0880BBB07
- 788880088880BBB07788888888880BBB077888888888870BB077888888888880
- BB07888888888888700088888888888888888888888888888888}
- ParentShowHint = False
- ShowHint = True
- OnClick = BtnOkClick
- end
- object BtnCancel: TSpeedButton
- Left = 9
- Top = 151
- Width = 25
- Height = 20
- Flat = True
- Glyph.Data = {
- F6000000424DF600000000000000760000002800000010000000100000000100
- 04000000000080000000130B0000130B00001000000010000000000000000000
- 8000008000000080800080000000800080008080000080808000C0C0C0000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
- 8888880007888888807880BBB0788888007880BBBB088880B07880BBBB07880B
- B0888800BBB070BB078888880BBB0BB07888888880BBBB078888888800BBBB07
- 88888800BBBBBBB0788880BBBBB00BBB078880BBBB08800BB07880BBB0888880
- BB07880008888888000788888888888888888888888888888888}
- ParentShowHint = False
- ShowHint = True
- OnClick = BtnCancelClick
- end
- object BtnCancel2: TSpeedButton
- Left = 190
- Top = 2
- Width = 10
- Height = 12
- Flat = True
- Glyph.Data = {
- 92000000424D9200000000000000760000002800000007000000070000000100
- 0400000000001C0000000000000000000000100000001000000000000000C6C6
- C600FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00111111100211
- 10201021021011002110110021101021021002111020}
- OnClick = BtnCancelClick
- end
- object Cal1: TCalendar
- Left = 8
- Top = 27
- Width = 186
- Height = 120
- Color = clInfoBk
- StartOfWeek = 0
- TabOrder = 0
- OnClick = Cal1Click
- OnChange = Cal1Change
- end
- end
-