object MainForm: TMainForm
  Left = 200
  Top = 131
  BorderIcons = [biSystemMenu]
  BorderStyle = bsToolWindow
  Caption = 'Popup Calendar'
  ClientHeight = 184
  ClientWidth = 208
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OnClose = FormClose
  OnCreate = FormCreate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object BtnDownYear: TSpeedButton
    Left = 4
    Top = 4
    Width = 25
    Height = 25
    Hint = 'Last Year'
    Glyph.Data = {
      78010000424D7801000000000000760000002800000020000000100000000100
      04000000000000000000120B0000120B00000000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      333333333333333333FF3333333333333744333333333333F773333333333337
      44473333333333F777F3333333333744444333333333F7733733333333374444
      4433333333F77333733333333744444447333333F7733337F333333744444444
      433333F77333333733333744444444443333377FFFFFFF7FFFFF999999999999
      9999733777777777777333CCCCCCCCCC33333773FF333373F3333333CCCCCCCC
      C333333773FF3337F333333333CCCCCCC33333333773FF373F3333333333CCCC
      CC333333333773FF73F33333333333CCCCC3333333333773F7F3333333333333
      CCC333333333333777FF33333333333333CC33333333333337730000}
    NumGlyphs = 2
    ParentShowHint = False
    ShowHint = True
    OnClick = BtnDownYearClick
  end
  object BtnDownMonth: TSpeedButton
    Left = 28
    Top = 4
    Width = 25
    Height = 25
    Hint = 'Last Month'
    Glyph.Data = {
      78010000424D7801000000000000760000002800000020000000100000000100
      04000000000000000000120B0000120B00000000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      3333333333333333333333333333333333333333333333333333333333333333
      3333333333333FF3333333333333003333333333333F77F33333333333009033
      333333333F7737F333333333009990333333333F773337FFFFFF330099999000
      00003F773333377777770099999999999990773FF33333FFFFF7330099999000
      000033773FF33777777733330099903333333333773FF7F33333333333009033
      33333333337737F3333333333333003333333333333377333333333333333333
      3333333333333333333333333333333333333333333333333333333333333333
      33333333333333333333333333333333333333333333333333330000}
    NumGlyphs = 2
    ParentShowHint = False
    ShowHint = True
    OnClick = BtnDownMonthClick
  end
  object BtnUpMonth: TSpeedButton
    Left = 154
    Top = 4
    Width = 25
    Height = 25
    Hint = 'Next Month'
    Glyph.Data = {
      78010000424D7801000000000000760000002800000020000000100000000100
      04000000000000000000120B0000120B00000000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      3333333333333333333333333333333333333333333333333333333333333333
      3333333333333333333333333333333333333333333FF3333333333333003333
      3333333333773FF3333333333309003333333333337F773FF333333333099900
      33333FFFFF7F33773FF30000000999990033777777733333773F099999999999
      99007FFFFFFF33333F7700000009999900337777777F333F7733333333099900
      33333333337F3F77333333333309003333333333337F77333333333333003333
      3333333333773333333333333333333333333333333333333333333333333333
      33333333333333333333333333333333333333333333333333330000}
    NumGlyphs = 2
    ParentShowHint = False
    ShowHint = True
    OnClick = BtnUpMonthClick
  end
  object BtnUpYear: TSpeedButton
    Left = 178
    Top = 4
    Width = 25
    Height = 25
    Hint = 'Next Year'
    Glyph.Data = {
      78010000424D7801000000000000760000002800000020000000100000000100
      04000000000000000000120B0000120B00000000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      33333FF3333333333333447333333333333377FFF33333333333744473333333
      333337773FF3333333333444447333333333373F773FF3333333334444447333
      33333373F3773FF3333333744444447333333337F333773FF333333444444444
      733333373F3333773FF333334444444444733FFF7FFFFFFF77FF999999999999
      999977777777777733773333CCCCCCCCCC3333337333333F7733333CCCCCCCCC
      33333337F3333F773333333CCCCCCC3333333337333F7733333333CCCCCC3333
      333333733F77333333333CCCCC333333333337FF7733333333333CCC33333333
      33333777333333333333CC3333333333333377333333333333330000}
    NumGlyphs = 2
    ParentShowHint = False
    ShowHint = True
    OnClick = BtnUpYearClick
  end
  object BtnCurrent: TSpeedButton
    Left = 4
    Top = 156
    Width = 25
    Height = 25
    Hint = 'Return to Current Date'
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000130B0000130B00000000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
      003337777777777777F330FFFFFFFFFFF03337F3333FFF3337F330FFFF000FFF
      F03337F33377733337F330FFFFF0FFFFF03337F33337F33337F330FFFF00FFFF
      F03337F33377F33337F330FFFFF0FFFFF03337F33337333337F330FFFFFFFFFF
      F03337FFF3F3F3F3F7F33000F0F0F0F0F0333777F7F7F7F7F7F330F0F000F070
      F03337F7F777F777F7F330F0F0F0F070F03337F7F7373777F7F330F0FF0FF0F0
      F03337F733733737F7F330FFFFFFFF00003337F33333337777F330FFFFFFFF0F
      F03337FFFFFFFF7F373330999999990F033337777777777F733330FFFFFFFF00
      333337FFFFFFFF77333330000000000333333777777777733333}
    NumGlyphs = 2
    ParentShowHint = False
    ShowHint = True
    OnClick = BtnCurrentClick
  end
  object BtnCopy: TSpeedButton
    Left = 28
    Top = 156
    Width = 25
    Height = 25
    Hint = 'Copy Selected Date to Clipboard'
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000130B0000130B00000000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF003333330B7FFF
      FFB0333333777F3333773333330B7FFFFFB0333333777F3333773333330B7FFF
      FFB0333333777F3333773333330B7FFFFFB03FFFFF777FFFFF77000000000077
      007077777777777777770FFFFFFFF00077B07F33333337FFFF770FFFFFFFF000
      7BB07F3FF3FFF77FF7770F00F000F00090077F77377737777F770FFFFFFFF039
      99337F3FFFF3F7F777FF0F0000F0F09999937F7777373777777F0FFFFFFFF999
      99997F3FF3FFF77777770F00F000003999337F773777773777F30FFFF0FF0339
      99337F3FF7F3733777F30F08F0F0337999337F7737F73F7777330FFFF0039999
      93337FFFF7737777733300000033333333337777773333333333}
    NumGlyphs = 2
    ParentShowHint = False
    ShowHint = True
    OnClick = BtnCopyClick
  end
  object BtnOptions: TSpeedButton
    Left = 60
    Top = 156
    Width = 25
    Height = 25
    Hint = 'Options...'
    Glyph.Data = {
      78010000424D7801000000000000760000002800000020000000100000000100
      04000000000000000000120B0000120B00000000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000000
      000033333377777777773333330FFFFFFFF03FF3FF7FF33F3FF700300000FF0F
      00F077F777773F737737E00BFBFB0FFFFFF07773333F7F3333F7E0BFBF000FFF
      F0F077F3337773F3F737E0FBFBFBF0F00FF077F3333FF7F77F37E0BFBF00000B
      0FF077F3337777737337E0FBFBFBFBF0FFF077F33FFFFFF73337E0BF0000000F
      FFF077FF777777733FF7000BFB00B0FF00F07773FF77373377373330000B0FFF
      FFF03337777373333FF7333330B0FFFF00003333373733FF777733330B0FF00F
      0FF03333737F37737F373330B00FFFFF0F033337F77F33337F733309030FFFFF
      00333377737FFFFF7733333033000000033333373377777773330000}
    NumGlyphs = 2
    ParentShowHint = False
    ShowHint = True
    OnClick = BtnOptionsClick
  end
  object BtnExit: TSpeedButton
    Left = 92
    Top = 156
    Width = 25
    Height = 25
    Hint = 'Exit Popup Calendar'
    Glyph.Data = {
      BE060000424DBE06000000000000360400002800000024000000120000000100
      0800000000008802000000000000000000000000000000000000000000000000
      80000080000000808000800000008000800080800000C0C0C000C0DCC000F0CA
      A600000000000000000000000000000000000000000000000000000000000000
      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
      000000000000000000000000000000000000F0FBFF00A4A0A000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0003F8F8F8F8F8
      F8F8F8F80707FF07FF07F807FFF8F8F8F8F8F8F8F8F8F8030303030303FF0404
      0404040000F8F8F8FFFFFF0404040404F8F8F8F8F8F8F8F8F8F8FF030303FFFF
      F8FF0303030304FD05000007FFFFFF0403030303F8F8F8F8F8F8F8F8F8F80303
      03F8F8F8F8FF030303030405FD0500FFFFFFFF040303030303030303F8FFF8F8
      F8FF030303F8FF0303FF0303030304FD05FD00FFFFFFFF040303030303030303
      F8F807F8F8FF030303F8FF0303FF030303030405FD0500FFFEFFFE0403030303
      03030303F8FFF807F8FF030303F8FF0303FF0303030304FD05FD00FFFFFFFF04
      0303030303030303F8F807F8F8FF030303F8FF0303FF030303030405FD0500FF
      FEFFFE040303030303030303F8FFF807F8FF030303F8FF0303FF0303030304FD
      05FD00FFFFFFFF040303030303030303F8F807F8F8FF030303F8FF0303FF0303
      03030405FD0500FFFEFFFE040303030303030303F8FFF807F8FF030303F8FF03
      03FF0303030304FD05FD00FEFFFEFF040303030303030303F8F807F8F8FF0303
      03F8FF0303FF030303030405FD0500FFFEFFFE040303030303030303F8FFF807
      F8FF030303F8FF0303FF0303030304FD05FD00FEFFFEFF040303030303030303
      F8F807F8F8FF030303F8FF0303FF030303030404040404040404040403030303
      03030303F8FFF8FFF8FFFFFFFFF8FF0303FF0303030303030303030303030303
      0303030303030303F8F8F8F8F8F8F8F8F8F8030303FF03030303030300000000
      000003030303030303030303030303FFFFFFFFFFFF03030303FF030303030303
      00FAFAFAFA00030303030303030303030303F8F8F8F8F8F8FF03030303FF0303
      03030303000000000000030303030303030303030303F8FFFFFFFFF8FF030303
      03FF}
    NumGlyphs = 2
    ParentShowHint = False
    ShowHint = True
    OnClick = ItemExitClick
  end
  object BtnToIcon: TSpeedButton
    Left = 146
    Top = 156
    Width = 57
    Height = 25
    Hint = 'Hide Calendar'
    Caption = 'OK'
    Glyph.Data = {
      78010000424D7801000000000000760000002800000020000000100000000100
      04000000000000000000120B0000120B00000000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
      555555555555555555555555555555555555555555FF55555555555559055555
      55555555577FF5555555555599905555555555557777F5555555555599905555
      555555557777FF5555555559999905555555555777777F555555559999990555
      5555557777777FF5555557990599905555555777757777F55555790555599055
      55557775555777FF5555555555599905555555555557777F5555555555559905
      555555555555777FF5555555555559905555555555555777FF55555555555579
      05555555555555777FF5555555555557905555555555555777FF555555555555
      59905555555555555777555555555555555555555555555555550000}
    NumGlyphs = 2
    ParentShowHint = False
    ShowHint = True
    OnClick = BtnToIconClick
  end
  object StringHolder: TEdit
    Left = 152
    Top = 136
    Width = 33
    Height = 21
    TabOrder = 2
    Visible = False
  end
  object Calendar: TDrawCalendar
    Left = 4
    Top = 36
    Width = 200
    Height = 115
    StartOfWeek = 0
    TabOrder = 0
    OnChange = CalendarChange
    DefaultColWidth = 27
    DefaultRowHeight = 15
    HeaderFont.Color = clMenuText
    HeaderFont.Height = -11
    HeaderFont.Name = 'MS Sans Serif'
    HeaderFont.Style = []
    TextFont.Color = clBlue
    TextFont.Height = -11
    TextFont.Name = 'MS Sans Serif'
    TextFont.Style = []
    DateFont.Color = clWindowText
    DateFont.Height = -13
    DateFont.Name = 'Times New Roman'
    DateFont.Style = []
    DateBox = False
    ColumnColor0 = clNone
    ColumnColor1 = clNone
    ColumnColor2 = clNone
    ColumnColor3 = clNone
    ColumnColor4 = clNone
    ColumnColor5 = clNone
    ColumnColor6 = clNone
  end
  object Title: TPanel
    Left = 60
    Top = 4
    Width = 88
    Height = 25
    Hint = 'Click and Drag to Add/Subtract Months Quickly'
    Caption = 'Aug 1996'
    Font.Color = clMenuText
    Font.Height = -12
    Font.Name = 'Arial'
    Font.Style = []
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
    TabOrder = 1
    OnMouseDown = TitleMouseDown
    OnMouseMove = TitleMouseMove
    OnMouseUp = TitleMouseUp
  end
  object IconMenu: TPopupMenu
    Alignment = paRight
    OnPopup = IconMenuPopup
    Left = 56
    Top = 128
    object ItemCalendar: TMenuItem
      Caption = 'Show Calendar'
      Default = True
      ShortCut = 0
      OnClick = TrayIconClick
    end
    object ItemCopy: TMenuItem
      Caption = 'Copy Current Date'
      ShortCut = 0
      OnClick = ItemCopyClick
    end
    object ItemCopyOther: TMenuItem
      Caption = 'Copy With Other Format'
      ShortCut = 0
      object ItemDate1: TMenuItem
        Caption = 'Date1'
        ShortCut = 0
        OnClick = ItemDate1Click
      end
      object ItemDate2: TMenuItem
        Caption = 'Date2'
        ShortCut = 0
        OnClick = ItemDate2Click
      end
      object ItemDate3: TMenuItem
        Caption = 'Date3'
        ShortCut = 0
        OnClick = ItemDate3Click
      end
      object ItemDate4: TMenuItem
        Caption = 'Date4'
        ShortCut = 0
        OnClick = ItemDate4Click
      end
      object ItemDate5: TMenuItem
        Caption = 'Date5'
        ShortCut = 0
        OnClick = ItemDate5Click
      end
      object ItemDateCustom: TMenuItem
        Caption = 'DateCustom'
        ShortCut = 0
        OnClick = ItemDateCustomClick
      end
    end
    object ItemOptions: TMenuItem
      Caption = 'Options...'
      ShortCut = 0
      OnClick = BtnOptionsClick
    end
    object ItemRegister: TMenuItem
      Caption = 'Register...'
      ShortCut = 0
      OnClick = ItemRegisterClick
    end
    object N1: TMenuItem
      Caption = '-'
      ShortCut = 0
    end
    object ItemReShuffle: TMenuItem
      Caption = 'Re-Shuffle Icon'
      ShortCut = 0
      OnClick = ItemReShuffleClick
    end
    object N2: TMenuItem
      Caption = '-'
      ShortCut = 0
    end
    object ItemExit: TMenuItem
      Caption = 'Exit'
      ShortCut = 0
      OnClick = ItemExitClick
    end
  end
  object Timer: TSuperTimer
    Interval = 30000
    OnTimer = TimerTimer
    ThreadPriority = tpLower
    Left = 24
    Top = 128
  end
  object RegAppConfig: TRegAppConfig
    RootKey = rhMachine
    Company = 'Alastria'
    ApplicationName = 'Popup Calendar'
    Version = 'v1.0a'
    Active = False
    Left = 120
    Top = 128
  end
  object TrayIcon: TTrayIcon2
    Active = False
    ShowDesigning = False
    OnClick = TrayIconClick
    OnDblClick = ItemCopyClick
    OnMidClick = TrayIconMidClick
    PopupMenu = IconMenu
    Left = 88
    Top = 128
  end
end