home *** CD-ROM | disk | FTP | other *** search
/ The Best of Windows 95.com 1996 December / WIN95_DEC_1996_4.ISO / finance / bilpwrnt.exe / BILLPOWR.EXE / 0 / RCDATA / TMONTHSCREEN / TMONTHSCREEN.txt
Text File  |  1996-12-15  |  45KB  |  1,481 lines
  1. object MonthScreen: TMonthScreen
  2.   Left = 0
  3.   Top = 44
  4.   Width = 644
  5.   Height = 484
  6.   Caption = 'TickleX'
  7.   Font.Color = clWindowText
  8.   Font.Height = -11
  9.   Font.Name = 'System'
  10.   Font.Pitch = fpFixed
  11.   Font.Style = []
  12.   Menu = MainMenu
  13.   Visible = True
  14.   OnCreate = FormCreate
  15.   OnDblClick = MonthScreenDblClick
  16.   OnDestroy = FormDestroy
  17.   OnDragDrop = MonthScreenImageDragDrop
  18.   OnDragOver = MonthScreenImageDragOver
  19.   OnKeyDown = MonthScreenKeyDown
  20.   OnKeyPress = MonthScreenKeyPress
  21.   OnMouseDown = MonthScreenImageMouseDown
  22.   OnShow = FormShow
  23.   PixelsPerInch = 96
  24.   TextHeight = 15
  25.   object MonthScreenImage: TImage
  26.     Left = 0
  27.     Top = 0
  28.     Width = 636
  29.     Height = 438
  30.     Align = alClient
  31.     OnDblClick = MonthScreenDblClick
  32.     OnDragDrop = MonthScreenImageDragDrop
  33.     OnDragOver = MonthScreenImageDragOver
  34.     OnEndDrag = DailyListBoxEndDrag
  35.     OnMouseDown = MonthScreenImageMouseDown
  36.   end
  37.   object WorkTimerLabel: TLabel
  38.     Left = 266
  39.     Top = 16
  40.     Width = 141
  41.     Height = 15
  42.     Alignment = taCenter
  43.     AutoSize = False
  44.     Caption = 'Timer is Running'
  45.   end
  46.   object DailyImage: TImage
  47.     Left = 470
  48.     Top = 246
  49.     Width = 105
  50.     Height = 105
  51.   end
  52.   object DailyListBox: TListBox
  53.     Left = 400
  54.     Top = 120
  55.     Width = 233
  56.     Height = 153
  57.     TabStop = False
  58.     BorderStyle = bsNone
  59.     Color = clWhite
  60.     Ctl3D = True
  61.     Font.Color = clWindowText
  62.     Font.Height = -11
  63.     Font.Name = 'Courier New'
  64.     Font.Pitch = fpFixed
  65.     Font.Style = []
  66.     ItemHeight = 14
  67.     MultiSelect = True
  68.     ParentCtl3D = False
  69.     ParentFont = False
  70.     Sorted = True
  71.     TabOrder = 0
  72.     Visible = False
  73.     OnDblClick = DailyListBoxDblClick
  74.     OnDragDrop = DailyListBoxDragDrop
  75.     OnDragOver = DailyListBoxDragOver
  76.     OnEndDrag = DailyListBoxEndDrag
  77.     OnKeyDown = MonthScreenKeyDown
  78.     OnKeyPress = MonthScreenKeyPress
  79.     OnMouseDown = MonthScreenImageMouseDown
  80.   end
  81.   object Dummy: TMemo
  82.     Left = 2
  83.     Top = 2
  84.     Width = 11
  85.     Height = 11
  86.     Font.Color = clBlack
  87.     Font.Height = -21
  88.     Font.Name = 'Wingdings'
  89.     Font.Pitch = fpFixed
  90.     Font.Style = []
  91.     Lines.Strings = (
  92.       '`'
  93.       '1'
  94.       '2'
  95.       '3'
  96.       '4'
  97.       '5'
  98.       '6'
  99.       '7'
  100.       '8'
  101.       '9'
  102.       '0'
  103.       '-'
  104.       '='
  105.       'q'
  106.       'w'
  107.       'e'
  108.       'r'
  109.       't'
  110.       'y'
  111.       'u'
  112.       'i'
  113.       'o'
  114.       'p'
  115.       '['
  116.       ']'
  117.       'a'
  118.       's'
  119.       'd'
  120.       'f'
  121.       'g'
  122.       'h'
  123.       'j'
  124.       'k'
  125.       'l'
  126.       ';'
  127.       #39
  128.       'z'
  129.       'x'
  130.       'c'
  131.       'v'
  132.       'b'
  133.       'n'
  134.       'm'
  135.       ','
  136.       '.'
  137.       '/'
  138.       '\'
  139.       ''
  140.       '~'
  141.       '!'
  142.       '@'
  143.       '#'
  144.       '$'
  145.       '%'
  146.       '^'
  147.       '&'
  148.       '*'
  149.       '('
  150.       ')'
  151.       '_'
  152.       '+'
  153.       'Q'
  154.       'W'
  155.       'E'
  156.       'R'
  157.       'T'
  158.       'Y'
  159.       'U'
  160.       'I'
  161.       'O'
  162.       'P'
  163.       '{'
  164.       '}'
  165.       'A'
  166.       'S'
  167.       'D'
  168.       'F'
  169.       'G'
  170.       'H'
  171.       'J'
  172.       'K'
  173.       'L'
  174.       ':'
  175.       '"'
  176.       'Z'
  177.       'X'
  178.       'C'
  179.       'V'
  180.       'B'
  181.       'N'
  182.       'M'
  183.       '<'
  184.       '>'
  185.       '?'
  186.       '|')
  187.     ParentFont = False
  188.     TabOrder = 1
  189.     OnDblClick = MonthScreenDblClick
  190.     OnDragDrop = MonthScreenImageDragDrop
  191.     OnDragOver = MonthScreenImageDragOver
  192.     OnEndDrag = DailyListBoxEndDrag
  193.     OnKeyDown = MonthScreenKeyDown
  194.     OnKeyPress = MonthScreenKeyPress
  195.     OnMouseDown = MonthScreenImageMouseDown
  196.   end
  197.   object UpBtn: TButton
  198.     Left = 262
  199.     Top = 48
  200.     Width = 22
  201.     Height = 22
  202.     Caption = ' Up '
  203.     Font.Color = clWindowText
  204.     Font.Height = -15
  205.     Font.Name = 'Terminal'
  206.     Font.Pitch = fpFixed
  207.     Font.Style = []
  208.     ParentFont = False
  209.     ParentShowHint = False
  210.     ShowHint = True
  211.     TabOrder = 2
  212.     TabStop = False
  213.     Visible = False
  214.     OnClick = UpDnBtnClick
  215.     OnKeyDown = MonthScreenKeyDown
  216.     OnKeyPress = MonthScreenKeyPress
  217.   end
  218.   object TimeBox: TEdit
  219.     Left = 576
  220.     Top = 4
  221.     Width = 60
  222.     Height = 23
  223.     TabStop = False
  224.     Enabled = False
  225.     Font.Color = clWindowText
  226.     Font.Height = -11
  227.     Font.Name = 'System'
  228.     Font.Pitch = fpFixed
  229.     Font.Style = []
  230.     ParentFont = False
  231.     ReadOnly = True
  232.     TabOrder = 3
  233.     Visible = False
  234.   end
  235.   object DateReport: TButton
  236.     Left = 80
  237.     Top = 150
  238.     Width = 131
  239.     Height = 23
  240.     Caption = 'DateReport'
  241.     TabOrder = 4
  242.     Visible = False
  243.   end
  244.   object GoToBtn: TButton
  245.     Left = 18
  246.     Top = 56
  247.     Width = 22
  248.     Height = 22
  249.     Caption = 'GoTo'
  250.     Font.Color = clWindowText
  251.     Font.Height = -15
  252.     Font.Name = 'System'
  253.     Font.Pitch = fpFixed
  254.     Font.Style = []
  255.     ParentFont = False
  256.     ParentShowHint = False
  257.     ShowHint = True
  258.     TabOrder = 5
  259.     TabStop = False
  260.     Visible = False
  261.     OnClick = ToolsDeleteClick
  262.     OnKeyDown = MonthScreenKeyDown
  263.     OnKeyPress = MonthScreenKeyPress
  264.   end
  265.   object DownBtn: TButton
  266.     Left = 262
  267.     Top = 416
  268.     Width = 22
  269.     Height = 22
  270.     Caption = 'Down'
  271.     Font.Color = clWindowText
  272.     Font.Height = -15
  273.     Font.Name = 'Terminal'
  274.     Font.Pitch = fpFixed
  275.     Font.Style = []
  276.     ParentFont = False
  277.     ParentShowHint = False
  278.     ShowHint = True
  279.     TabOrder = 6
  280.     TabStop = False
  281.     Visible = False
  282.     OnClick = UpDnBtnClick
  283.     OnKeyDown = MonthScreenKeyDown
  284.     OnKeyPress = MonthScreenKeyPress
  285.   end
  286.   object SpeedBtnBox: TPanel
  287.     Left = 30
  288.     Top = 356
  289.     Width = 475
  290.     Height = 25
  291.     BevelOuter = bvNone
  292.     BorderWidth = 1
  293.     TabOrder = 7
  294.     Visible = False
  295.     object DayBtn: TSpeedButton
  296.       Left = 10
  297.       Top = 0
  298.       Width = 23
  299.       Height = 23
  300.       Glyph.Data = {
  301.         8C010000424D8C01000000000000760000002800000015000000150000000100
  302.         040000000000FC00000000000000000000000000000000000000000000000000
  303.         80000080000000808000800000008000800080800000C0C0C000808080000000
  304.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00EEEEEEEEEEEE
  305.         EEEEEEEEE000EEEEEEEEEEEEEEEEEEEEE000EEEEEEEEEEEEEEEEEEEEE000ECCC
  306.         CCCCCCCCCCCCCCCCE000ECFFFFFFFFFFFFFFFFFCE000ECFFFFFFFFFFFFFFFFFC
  307.         E000ECFFFFFFFFFFFFFFFFFCE000ECFFFFFFFFFFFFFFFFFCE000ECFFFFFFFFFF
  308.         FFFFFFFCE000ECFFFFFFFFFFFFFFFFFCE000ECFFFFFFFFFFFFFFFFFCE000ECFF
  309.         FFFFFFFFFFFFFFFCE000ECFFFFFFFFFFFFFFFFFCE000ECFFFFFFFFFFFFFFFFFC
  310.         E000ECFFFFFFFFFFFFFFFFFCE000ECCCCCCCCCCCCCCCCCCCE000ECEEEEEEEEEE
  311.         EEEEEEECE000ECEEEEEEEEEEEEEEEEECE000ECCCCCCCCCCCCCCCCCCCE000EEEE
  312.         EEEEEEEEEEEEEEEEE000EEEEEEEEEEEEEEEEEEEEE00000000000000000000000
  313.         00000000000000000000000000000000}
  314.       ParentShowHint = False
  315.       ShowHint = True
  316.       Visible = False
  317.       OnClick = DayBtnClick
  318.     end
  319.     object NewBtn: TSpeedButton
  320.       Left = 34
  321.       Top = 0
  322.       Width = 23
  323.       Height = 23
  324.       Glyph.Data = {
  325.         8C010000424D8C01000000000000760000002800000015000000150000000100
  326.         040000000000FC00000000000000000000000000000000000000000000000000
  327.         80000080000000808000800000008000800080800000C0C0C000808080000000
  328.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00EEEEEEEEEEEE
  329.         EEEEEEEEE000EEEEEEEEEEEEEEEEEEEEE000EEEEEEEEE0EEEEEEEEEEE000EEEE
  330.         EEEE000EEEEEEEEEE000EEEEEEEE000EEEEEEEEEE000EEEEEEEE070EEEEEEEEE
  331.         E000EEEEBEEB000BEEBBEEEEE000EEEEEBBB0B0BBBEEEEEEE000EEEEEBBB0F0B
  332.         BBEEEEEEE000EEEEBBB0F8F0BBBBEEEEE000EEEEBB0FB8BF0BBBEEEEE000EBBB
  333.         BB0BF8FB0BBBBBEEE000EEEEBB0FBFBF0BBBEEEEE000EEEEBBB0FBF0BBBBEEEE
  334.         E000EEEEEBBB000BBBEEEEEEE000EEEEEBBBBBBBBBEEEEEEE000EEEEEBBBBBBB
  335.         BBEEEEEEE000EEEEBEEBBBBBEEBBEEEEE000EEEEEEEEEBEEEEEEEEEEE000EEEE
  336.         EEEEEBEEEEEEEEEEE000EEEEEEEEEEEEEEEEEEEEE00000000000000000000000
  337.         00000000000000000000000000000000}
  338.       ParentShowHint = False
  339.       ShowHint = True
  340.       Visible = False
  341.       OnClick = NewBtnClick
  342.     end
  343.     object HuntBtn: TSpeedButton
  344.       Left = 58
  345.       Top = 2
  346.       Width = 44
  347.       Height = 23
  348.       Glyph.Data = {
  349.         88020000424D880200000000000076000000280000002A000000150000000100
  350.         040000000000F801000000000000000000000000000000000000000000000000
  351.         80000080000000808000800000008000800080800000C0C0C000808080000000
  352.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00EEEEEEEEEEEE
  353.         EEEEEEEEEEEEEEEEEEEEEEEEEEEEEE000000EEEEEEEEEEEEEEEEEEEEEECCCCCC
  354.         CCCCCCCCCEEEEE000000EECCEEEEEEEEEE00EEEEECCCCCCCCCCCCCCCCCEEEE00
  355.         0000EECCEEEEEEEEEE00EEEEEC888888888888888CEEEE000000EECCCEEEEEEE
  356.         EEE00EEEECF8F8FF88F88F8F8CEEEE000000EECCCEEEEEEEEEE00EEEECF8F8FF
  357.         88F88F8F8CEEEE000000EEECCCEEEEEEEEE00EEEEC8F8F88FF8FF899FCEEEE00
  358.         0000EEECCCEEEEEEEEEE00EEECF8F8FF88F88F8F8CEEEE000000EEEECCCCCCCC
  359.         EEEE00EEECCCCCCCCCCCCCCCCCEEEE000000EEEECCCEEEEECEEEE00EEEEECFFF
  360.         FFFFFFCEEEEEEE000000EEEECCCEEEEEECEEE00EEEEECF0000F00FCEEEEEEE00
  361.         0000EEECEEEEEEEEEECEE00EEEEECF0000F00FCEEEEEEE000000EEECEEEEEEEE
  362.         EECEE00EEEEECFFFFFFFFFCEEEEEEE000000EEECEEEEEEEEEECEEE00EEEECF00
  363.         F00000CEEEEEEE000000EEECEEEEEFFFEECEEE00EEEECFFFF0FFFCEEEEEEEE00
  364.         0000EEECEEEEEFFFEECEEE00EEEECF00F0F0CEEEEEEEEE000000EEEECEEEEFFE
  365.         ECEEEEE00EEECFFFF0FCEEEEEEEEEE000000EEEEECEEEEEECEEEEEE00EEECCCC
  366.         C0CEEEEEEEEEEE000000EEEEEECCCCCCEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE00
  367.         0000EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE000000EEEEEEEEEEEE
  368.         EEEEEEEEEEEEEEEEEEEEEEEEEEEEEE0000000000000000000000000000000000
  369.         000000000000000000000000}
  370.       ParentShowHint = False
  371.       ShowHint = True
  372.       Visible = False
  373.       OnClick = HuntBtnClick
  374.     end
  375.     object EmpFreeTimeBtn: TSpeedButton
  376.       Left = 132
  377.       Top = 0
  378.       Width = 23
  379.       Height = 23
  380.       Glyph.Data = {
  381.         8C010000424D8C01000000000000760000002800000015000000150000000100
  382.         040000000000FC00000000000000000000000000000000000000000000000000
  383.         80000080000000808000800000008000800080800000C0C0C000808080000000
  384.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00EEEEEEEEEEEE
  385.         EEEEEEEEE000EEEEEEEEEEEEEEEEEEEEE000EEEEEEEEEEEEEEEEEEEEE000EEEE
  386.         EEEEEEEEEEEEEEEEE000EEEEECCCCCCCCCCCEEEEE000EEEEECFCFCFCFCFCEEEE
  387.         E000EEEEECFCFCFCFCFCEEEEE000EEEEECFCFCFCFCFCEEEEE000EEEEECFCFCFC
  388.         FCFCEEEEE000EEEEECFCFCFCFCFCEEEEE000EEEEECFCFCFCFCFCEEEEE000EEEE
  389.         ECFCFCFCFCFCEEEEE000EEEEECFCFCFCFCFCEEEEE000EEEEECFCFCFCFCFCEEEE
  390.         E000EEEEECFCFCFCFCFCEEEEE000EEEEECFCFCFCFCFCEEEEE000EEEEECCCCCCC
  391.         CCCCEEEEE000EEEEEEEEEEEEEEEEEEEEE000EEEEEEEEEEEEEEEEEEEEE000EEEE
  392.         EEEEEEEEEEEEEEEEE000EEEEEEEEEEEEEEEEEEEEE00000000000000000000000
  393.         00000000000000000000000000000000}
  394.       ParentShowHint = False
  395.       ShowHint = True
  396.       Visible = False
  397.       OnClick = EmpFreeTimeBtnClick
  398.     end
  399.     object memoBtn: TSpeedButton
  400.       Left = 158
  401.       Top = 0
  402.       Width = 23
  403.       Height = 25
  404.       Font.Color = clWindowText
  405.       Font.Height = -15
  406.       Font.Name = 'Terminal'
  407.       Font.Pitch = fpFixed
  408.       Font.Style = []
  409.       Glyph.Data = {
  410.         8C010000424D8C01000000000000760000002800000015000000150000000100
  411.         040000000000FC00000000000000000000000000000000000000000000000000
  412.         80000080000000808000800000008000800080800000C0C0C000808080000000
  413.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00EEEEEEEEEEEE
  414.         EEEEEEEEE000EEEEEEEEEEEEEEEEEEEEE000EEEEEEEEEEEEEEEEEEEEE000EEEE
  415.         EEEEEEEEEEEEEEEEE000EE5CCCCCCCCCEEEEEEEEE000EECFFFFFFFFFCEEEEEEE
  416.         E000EECFEEEEEECCCCCE00EEE000EECFFFFFF0BFBFB008EEE000EECF0EEEE000
  417.         FBFB08EEE000EECFF00F0FBFBFBF08EEE000EECFE0B00000FBFB08EEE000EECF
  418.         FF0FBFBFBFBF08EEE000EECFEEE0000000FB08EEE000EECFFFFF0B00BFB008EE
  419.         E000EECFEEEEE0B0000EEEEEE000EECFFFFFFF0B0EEEEEEEE000EECCFCFCFCFC
  420.         B0EEEEEEE000EEEC8C8C8C8CCB0EEEEEE000EEEC8C8C8C8CE090EEEEE000EEEC
  421.         ECECECEEEE0EEEEEE000EEEEEEEEEEEEEEEEEEEEE00000000000000000000000
  422.         00000000000000000000000000000000}
  423.       ParentFont = False
  424.       ParentShowHint = False
  425.       ShowHint = True
  426.       Visible = False
  427.       OnClick = memobtnClick
  428.     end
  429.     object WeekBtn: TSpeedButton
  430.       Left = 182
  431.       Top = 0
  432.       Width = 23
  433.       Height = 23
  434.       Glyph.Data = {
  435.         8C010000424D8C01000000000000760000002800000015000000150000000100
  436.         040000000000FC00000000000000000000000000000000000000000000000000
  437.         80000080000000808000800000008000800080800000C0C0C000808080000000
  438.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00EEEEEEEEEEEE
  439.         EEEEEEEEE000EEEEEEEEEEEEEEEEEEEEE000EEEEEEEEEEEEEEEEEEEEE000ECCC
  440.         CCCCCCCCCCCCCCCCE000ECEECEECEECEECEECEECE000ECEECEECEECEECEECEEC
  441.         E000ECEECEECEECEECEECEECE000ECEECEECEECEECEECEECE000ECEECEECEECE
  442.         ECEECEECE000ECEECEECEECEECEECEECE000ECEECEECEECEECEECEECE000ECEE
  443.         CEECEECEECEECEECE000ECEECEECEECEECEECEECE000ECEECEECEECEECEECEEC
  444.         E000ECEECEECEECEECEECEECE000ECCCCCCCCCCCCCCCCCCCE000ECEEEEEEEEEE
  445.         EEEEEEECE000ECEEEEEEEEEEEEEEEEECE000ECCCCCCCCCCCCCCCCCCCE000EEEE
  446.         EEEEEEEEEEEEEEEEE000EEEEEEEEEEEEEEEEEEEEE00000000000000000000000
  447.         00000000000000000000000000000000}
  448.       ParentShowHint = False
  449.       ShowHint = True
  450.       Visible = False
  451.       OnClick = ViewWeekClick
  452.     end
  453.     object FullScrnClndrBtn: TSpeedButton
  454.       Left = 206
  455.       Top = 0
  456.       Width = 23
  457.       Height = 23
  458.       Glyph.Data = {
  459.         8C010000424D8C01000000000000760000002800000015000000150000000100
  460.         040000000000FC00000000000000000000000000000000000000000000000000
  461.         80000080000000808000800000008000800080800000C0C0C000808080000000
  462.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00EEEEEEEEEEEE
  463.         EEEEEEEEE000EEEEEEEEEEEEEEEEEEEEE000EEEEEEEEEEEEEEEEEEEEE000ECCC
  464.         CCCCCCCCCCCCCCCCE000ECEECEECEECEECEECEECE000ECEECEECEECEECEECEEC
  465.         E000ECCCCCCCCCCCCCCCCCCCE000ECEECEECEECEECEECEECE000ECEECEECEECE
  466.         ECEECEECE000ECCCCCCCCCCCCCCCCCCCE000ECEECEECEECEECEECEECE000ECEE
  467.         CEECEECEECEECEECE000ECCCCCCCCCCCCCCCCCCCE000ECEECEECEECEECEECEEC
  468.         E000ECEECEECEECEECEECEECE000ECCCCCCCCCCCCCCCCCCCE000ECEEEEEEEEEE
  469.         EEEEEEECE000ECEEEEEEEEEEEEEEEEECE000ECCCCCCCCCCCCCCCCCCCE000EEEE
  470.         EEEEEEEEEEEEEEEEE000EEEEEEEEEEEEEEEEEEEEE00000000000000000000000
  471.         00000000000000000000000000000000}
  472.       ParentShowHint = False
  473.       ShowHint = True
  474.       Visible = False
  475.       OnClick = MonthSelectClick
  476.     end
  477.     object SpltScrnClndrBtn: TSpeedButton
  478.       Left = 228
  479.       Top = 0
  480.       Width = 23
  481.       Height = 23
  482.       Glyph.Data = {
  483.         8C010000424D8C01000000000000760000002800000015000000150000000100
  484.         040000000000FC00000000000000000000000000000000000000000000000000
  485.         80000080000000808000800000008000800080800000C0C0C000808080000000
  486.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00EEEEEEEEEEEE
  487.         EEEEEEEEE000EEEEEEEEEEEEEEEEEEEEE000EEEEEEEEEEEEEEEEEEEEE000ECCC
  488.         CCCCCCCCCCCCCCCCE000ECEECEECEECFFFFFFFFCE000ECEECEECEECFFFFFFFFC
  489.         E000ECCCCCCCCCCFFFFFFFFCE000ECEECEECEECFFFFFFFFCE000ECEECEECEECF
  490.         FFFFFFFCE000ECCCCCCCCCCFFFFFFFFCE000ECEECEECEECFFFFFFFFCE000ECEE
  491.         CEECEECFFFFFFFFCE000ECCCCCCCCCCFFFFFFFFCE000ECEECEECEECFFFFFFFFC
  492.         E000ECEECEECEECFFFFFFFFCE000ECCCCCCCCCCCCCCCCCCCE000ECEEEEEEEEEE
  493.         EEEEEEECE000ECEEEEEEEEEEEEEEEEECE000ECCCCCCCCCCCCCCCCCCCE000EEEE
  494.         EEEEEEEEEEEEEEEEE000EEEEEEEEEEEEEEEEEEEEE00000000000000000000000
  495.         00000000000000000000000000000000}
  496.       ParentShowHint = False
  497.       ShowHint = True
  498.       Visible = False
  499.       OnClick = MonthSelectClick
  500.     end
  501.     object PhonBookClndrBtn: TSpeedButton
  502.       Left = 252
  503.       Top = 0
  504.       Width = 23
  505.       Height = 23
  506.       Glyph.Data = {
  507.         8C010000424D8C01000000000000760000002800000015000000150000000100
  508.         040000000000FC00000000000000000000000000000000000000000000000000
  509.         80000080000000808000800000008000800080800000C0C0C000808080000000
  510.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00EEEEEEEEEEEE
  511.         EEEEEEEEE000EEEEEEEEEEEEEEEEEEEEE000EEEEEEEEEEEEEEEEEEEEE000ECCC
  512.         CCCCCCCCCCCCCCCCE000ECFFFFFFFFCFFFFFFFFCE000ECFFFFFFFFCFFFFFFFFC
  513.         E000ECCCCCCCCCCFFFFFFFFCE000ECEECEECEECFFFFFFFFCE000ECEECEECEECF
  514.         FFFFFFFCE000ECCCCCCCCCCFFFFFFFFCE000ECEECEECEECFFFFFFFFCE000ECEE
  515.         CEECEECFFFFFFFFCE000ECCCCCCCCCCFFFFFFFFCE000ECEECEECEECFFFFFFFFC
  516.         E000ECEECEECEECFFFFFFFFCE000ECCCCCCCCCCCCCCCCCCCE000ECEEEEEEEEEE
  517.         EEEEEEECE000ECEEEEEEEEEEEEEEEEECE000ECCCCCCCCCCCCCCCCCCCE000EEEE
  518.         EEEEEEEEEEEEEEEEE000EEEEEEEEEEEEEEEEEEEEE00000000000000000000000
  519.         00000000000000000000000000000000}
  520.       ParentShowHint = False
  521.       ShowHint = True
  522.       Visible = False
  523.       OnClick = MonthSelectClick
  524.     end
  525.     object DetailBtn: TSpeedButton
  526.       Left = 274
  527.       Top = 0
  528.       Width = 23
  529.       Height = 23
  530.       Glyph.Data = {
  531.         8C010000424D8C01000000000000760000002800000015000000150000000100
  532.         040000000000FC00000000000000000000000000000000000000000000000000
  533.         80000080000000808000800000008000800080800000C0C0C000808080000000
  534.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00EEEEEEEEEEEE
  535.         EEEEEEEEE000EEEEEEEEEEEEEEEEEEEEE000EEEEEEEEEEEEEEEEEEEEE000EEEE
  536.         EEEEEEEEEEEEEEEEE000EEEEECCCCCCCCCCCEEEEE000EEEEECFFFFFFFFFCEEEE
  537.         E000EEEEECCCCCCCCCCCEEEEE000EEEEECFFFFFFFFFCEEEEE000EEEEECCCCCCC
  538.         CCCCEEEEE000EEEEECFFFFFFFFFCEEEEE000EEEEECCCCCCCCCCCEEEEE000EEEE
  539.         ECFFFFFFFFFCEEEEE000EEEEECCCCCCCCCCCEEEEE000EEEEECFFFFFFFFFCEEEE
  540.         E000EEEEECCCCCCCCCCCEEEEE000EEEEECFFFFFFFFFCEEEEE000EEEEECCCCCCC
  541.         CCCCEEEEE000EEEEEEEEEEEEEEEEEEEEE000EEEEEEEEEEEEEEEEEEEEE000EEEE
  542.         EEEEEEEEEEEEEEEEE000EEEEEEEEEEEEEEEEEEEEE00000000000000000000000
  543.         00000000000000000000000000000000}
  544.       ParentShowHint = False
  545.       ShowHint = True
  546.       Visible = False
  547.       OnClick = EmpFreeTimeBtnClick
  548.     end
  549.     object ToDoBtn: TSpeedButton
  550.       Left = 322
  551.       Top = 0
  552.       Width = 23
  553.       Height = 23
  554.       Glyph.Data = {
  555.         8C010000424D8C01000000000000760000002800000015000000150000000100
  556.         040000000000FC00000000000000000000000000000000000000000000000000
  557.         80000080000000808000800000008000800080800000C0C0C000808080000000
  558.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00EEEEEEEEEEEE
  559.         EEEEEEEEE000EEEEEEEEEEEEEEEEEEEEE000EEEEEEEEEEEEEEEEEEEEE000EEEE
  560.         EEEEEEEEEEEEEEEEE000EEEEEEEECFEEEEEEEEEEE000EEEEEEECCCFEEEEEEEEE
  561.         E000EEEEEECCCCFEEEEEEEEEE000EEEEEECCCCFEEEEEEEEEE000EEEEECCCCCCF
  562.         EEEEEEEEE000EEEECCCCCCCFEEEEEEEEE000EEECCCFEECCCFEEEEEEEE000ECCC
  563.         FEEEEECCFEEEEEEEE000EEEEEEEEEECCCFEEEEEEE000EEEEEEEEEEECCCFEEEEE
  564.         E000EEEEEEEEEEECCCFEEEEEE000EEEEEEEEEEEECCCFEEEEE000EEEEEEEEEEEE
  565.         ECCCFEEEE000EEEEEEEEEEEEEEECCFEEE000EEEEEEEEEEEEEEEEE66EE000EEEE
  566.         EEEEEEEEEEEEEEEEE000EEEEEEEEEEEEEEEEEEEEE00000000000000000000000
  567.         00000000000000000000000000000000}
  568.       ParentShowHint = False
  569.       ShowHint = True
  570.       Visible = False
  571.       OnClick = ToDoBtnClick
  572.     end
  573.     object ScheduleBtn: TSpeedButton
  574.       Left = 346
  575.       Top = 0
  576.       Width = 23
  577.       Height = 23
  578.       Glyph.Data = {
  579.         8C010000424D8C01000000000000760000002800000015000000150000000100
  580.         040000000000FC00000000000000000000000000000000000000000000000000
  581.         80000080000000808000800000008000800080800000C0C0C000808080000000
  582.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00EEEEEEEEEEEE
  583.         EEEEEEEEE000EEEEEEEEEEEEEEEEEEEEE000EEEEEEEE00000EEEEEEEE000EEEE
  584.         EE000000000EEEEEE000EEEEE00088888000EEEEE000EEEE0088888888800EEE
  585.         E000EEE008888777888800EEE000EEE008887777788800EEE000EE0088877FFF
  586.         7788800EE000EE008877F8F8F778800EE000EE008877FFFFF778800EE000EE00
  587.         8877F8F8F778800EE000EE0088877FFF7788800EE000EEE008887777788800EE
  588.         E000EEE008888777888800EEE000EEEE0088888888800EEEE000EEEEE0008888
  589.         8000EEEEE000EEEEEE000000000EEEEEE000EEEEEEEE00000EEEEEEEE000EEEE
  590.         EEEEEEEEEEEEEEEEE000EEEEEEEEEEEEEEEEEEEEE00000000000000000000000
  591.         00000000000000000000000000000000}
  592.       ParentShowHint = False
  593.       ShowHint = True
  594.       Visible = False
  595.       OnClick = ScheduleBtnClick
  596.     end
  597.     object logBtn: TSpeedButton
  598.       Left = 370
  599.       Top = 0
  600.       Width = 23
  601.       Height = 23
  602.       Glyph.Data = {
  603.         8C010000424D8C01000000000000760000002800000015000000150000000100
  604.         040000000000FC00000000000000000000000000000000000000000000000000
  605.         80000080000000808000800000008000800080800000C0C0C000808080000000
  606.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00EEEEEEEEEEEE
  607.         EEEEEEEEE000EEEEEEEEEEEEEEEEEEEEE000EEEEEEEECCCCCEEEEEEEE000EEEE
  608.         EECC66666CCEEEEEE000EEEEEC666666666CEEEEE000EEEEC66677777666CEEE
  609.         E000EEEC6667677767666CEEE000EEEC6676777776766CEEE000EEC667677FFF
  610.         776766CEE000EEC66777F7F7F77766CEE000EEC66777FFFFF77766CEE000EEC6
  611.         6777F7F7F77766CEE000EEC667677FFF776766CEE000EEEC6676777776766CEE
  612.         E000EEEC6667677767666CEEE000EEEEC66677777666CEEEE000EEEEEC666666
  613.         666CEEEEE000EEEEEECC66666CCEEEEEE000EEEEEEEECCCCCEEEEEEEE000EEEE
  614.         EEEEEEEEEEEEEEEEE000EEEEEEEEEEEEEEEEEEEEE00000000000000000000000
  615.         00000000000000000000000000000000}
  616.       ParentShowHint = False
  617.       ShowHint = True
  618.       Visible = False
  619.       OnClick = logBtnClick
  620.     end
  621.     object GenLdgrBtn: TSpeedButton
  622.       Left = 394
  623.       Top = 0
  624.       Width = 23
  625.       Height = 23
  626.       Glyph.Data = {
  627.         8C010000424D8C01000000000000760000002800000015000000150000000100
  628.         040000000000FC00000000000000000000000000000000000000000000000000
  629.         80000080000000808000800000008000800080800000C0C0C000808080000000
  630.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00EEEEEEEEEEEE
  631.         EEEEEEEEE000EEEEEEEEEEEEEEEEEEEEE000EEEEEEEE99999EEEEEEEE000EEEE
  632.         EE999999999EEEEEE000EEEEE99988888999EEEEE000EEEE9988888888899EEE
  633.         E000EEE998888777888899EEE000EEE998887777788899EEE000EE9988877FFF
  634.         7788899EE000EE998877F8F8F778899EE000EE998877FFFFF778899EE000EE99
  635.         8877F8F8F778899EE000EE9988877FFF7788899EE000EEE998887777788899EE
  636.         E000EEE998888777888899EEE000EEEE9988888888899EEEE000EEEEE9998888
  637.         8999EEEEE000EEEEEE999999999EEEEEE000EEEEEEEE99999EEEEEEEE000EEEE
  638.         EEEEEEEEEEEEEEEEE000EEEEEEEEEEEEEEEEEEEEE00000000000000000000000
  639.         00000000000000000000000000000000}
  640.       ParentShowHint = False
  641.       ShowHint = True
  642.       Visible = False
  643.       OnClick = GenLdgrBtnClick
  644.     end
  645.     object billBtn: TSpeedButton
  646.       Left = 300
  647.       Top = 2
  648.       Width = 23
  649.       Height = 23
  650.       Glyph.Data = {
  651.         8C010000424D8C01000000000000760000002800000015000000150000000100
  652.         040000000000FC00000000000000000000000000000000000000000000000000
  653.         80000080000000808000800000008000800080800000C0C0C000808080000000
  654.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00EEEEEEEEEEEE
  655.         EEEEEEEEE000EEEEEEEEEEEEEEEEEEEEE000EECCCCCCCCCCCCCCCCEEE000EECE
  656.         EEEEEEEEEEEEECEEE000EECEE0000000000EECEEE000EECEEEEEEEEEEEEEECEE
  657.         E000EECEE0000000000EECEEE000EECEEEEEEEEEEEEEECEEE000EECEE0000000
  658.         000EECEEE000EECEEEEEEEEEEEEEECEEE000EECEE0000000000EECEEE000EECE
  659.         EEEEEEEEEEEEECEEE000EECEEEEEEEEEEEEEECEEE000EECEE8888EEEEEEEECEE
  660.         E000EECEEEEEEEEEEEEEECEEE000EECEEEEEEEEEEEEEECEEE000EECEEEE00000
  661.         0EEEECEEE000EECEEEEEEEEEEEEEECEEE000EECCCCCCCCCCCCCCCCEEE000EEEE
  662.         EEEEEEEEEEEEEEEEE000EEEEEEEEEEEEEEEEEEEEE00000000000000000000000
  663.         00000000000000000000000000000000}
  664.       ParentShowHint = False
  665.       ShowHint = True
  666.       Visible = False
  667.       OnClick = billBtnClick
  668.     end
  669.     object ProjBtn: TSpeedButton
  670.       Left = 104
  671.       Top = 0
  672.       Width = 23
  673.       Height = 23
  674.       Glyph.Data = {
  675.         8C010000424D8C01000000000000760000002800000015000000150000000100
  676.         040000000000FC00000000000000000000000000000000000000000000000000
  677.         80000080000000808000800000008000800080800000C0C0C000808080000000
  678.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00EEEEEEEEEEEE
  679.         EEEEEEEEE000EEEEEEEEEEEEEEEEEEEEE000EEEEEEEEEEEEEEEEEEEEE000EE00
  680.         0000000000000EEEE000000B77B77BB7BB7BB0EEE0000FF0BBFFB77B77B77B0E
  681.         E0000FF0BB7BFF7B77B77B00E0000FBF00B77BB7BF7BB7BB00000BFF00B77BB7
  682.         BF7BB7BB00000FFBFF0000000000000000000BBBFFFBBFFBFFB0EEEEE0000BFF
  683.         BBFFFFFBFFB0EEEEE0000FFBFFBFFBBFBBF0EEEEE0000BBFFFFBBFFBFFB0EEEE
  684.         E0000BBFBBFBBFFBFF00EEEEE000E00BFFBFF000000EEEEEE000EE0BFFBFF0EE
  685.         EEEEEEEEE000EE00000000EEEEEEEEEEE000EEEEEEEEEEEEEEEEEEEEE000EEEE
  686.         EEEEEEEEEEEEEEEEE000EEEEEEEEEEEEEEEEEEEEE00000000000000000000000
  687.         00000000000000000000000000000000}
  688.       ParentShowHint = False
  689.       ShowHint = True
  690.       Visible = False
  691.       OnClick = ProjBtnClick
  692.     end
  693.     object OldBtn: TBitBtn
  694.       Left = 418
  695.       Top = 0
  696.       Width = 23
  697.       Height = 23
  698.       ParentShowHint = False
  699.       ShowHint = True
  700.       TabOrder = 0
  701.       Visible = False
  702.       OnClick = oldBtnClick
  703.       OnDragDrop = oldBtnDragDrop
  704.       OnDragOver = oldBtnDragOver
  705.       OnEndDrag = DailyListBoxEndDrag
  706.       OnKeyDown = MonthScreenKeyDown
  707.       OnKeyPress = MonthScreenKeyPress
  708.       Glyph.Data = {
  709.         8C010000424D8C01000000000000760000002800000015000000150000000100
  710.         040000000000FC00000000000000000000000000000000000000000000000000
  711.         80000080000000808000800000008000800080800000C0C0C000808080000000
  712.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00EEEEEEEEEEEE
  713.         EEEEEEEEE000EEEEEEEEEEEEEEEEEEEEE000EEEEEEEEE0EEEEEEEEEEE000EEEE
  714.         EEEE000EEEEEEEEEE000EEEEEEEE000EEEEEEEEEE000EEEEEEEE070EEEEEEEEE
  715.         E000EEEEEEEE000EEEEEEEEEE000EEEEEEEE000EEEEEEEEEE000EEEEEEE80708
  716.         EEEEEEEEE000EEEEEE8070F08EEEEEEEE000EEEEE807F07F08EEEEEEE000EEEE
  717.         E807F0F708EEEEEEE000EEEEE80F7F7F08EEEEEEE000EEEEEE80F7708EEEEEEE
  718.         E000EEEEEEE80008EEEEEEEEE000EEEEEEEE888EEEEEEEEEE000EEEEEEEEEEEE
  719.         EEEEEEEEE000EEEEEEEEEEEEEEEEEEEEE000EEEEEEEEEEEEEEEEEEEEE000EEEE
  720.         EEEEEEEEEEEEEEEEE000EEEEEEEEEEEEEEEEEEEEE00000000000000000000000
  721.         00000000000000000000000000000000}
  722.     end
  723.     object delBtn: TBitBtn
  724.       Left = 444
  725.       Top = 0
  726.       Width = 23
  727.       Height = 23
  728.       ParentShowHint = False
  729.       ShowHint = True
  730.       TabOrder = 1
  731.       Visible = False
  732.       OnClick = delBtnClick
  733.       OnDragDrop = delBtnDragDrop
  734.       OnDragOver = delBtnDragOver
  735.       OnEndDrag = DailyListBoxEndDrag
  736.       OnKeyDown = MonthScreenKeyDown
  737.       OnKeyPress = MonthScreenKeyPress
  738.       Glyph.Data = {
  739.         8C010000424D8C01000000000000760000002800000015000000150000000100
  740.         040000000000FC00000000000000000000000000000000000000000000000000
  741.         80000080000000808000800000008000800080800000C0C0C000808080000000
  742.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00EEEEEEEEEEEE
  743.         EEEEEEEEE000EEEEEEEEEEEEEEEEEEEEE000EEEEEEEEEEEEEEEEEEEEE000EEEE
  744.         EECCCCCCCCCEEEEEE000EEEEEECF888888CEEEEEE000EEEEEECFC7C7C8CEEEEE
  745.         E000EEEEEECFC7C8C8CEEEEEE000EEEEEECFC7C7C8CEEEEEE000EEEEEECFC7C8
  746.         C8CEEEEEE000EEEEEECFC7C7C8CEEEEEE000EEEECECFC7C8C8CECEEEE000EEEE
  747.         ECCFC7C7C8CCEEEEE000EEEEEECFC7C8C8CEEEEEE000EEEEEEC8C8C8C8CEEEEE
  748.         E000EEEEECCCCCCCCCCCEEEEE000EEEEECF77788888CEEEEE000EEEEECCCCCCC
  749.         CCCCEEEEE000EEEEEEEEC888CEEEEEEEE000EEEEEEEECCCCCEEEEEEEE000EEEE
  750.         EEEEEEEEEEEEEEEEE000EEEEEEEEEEEEEEEEEEEEE00000000000000000000000
  751.         00000000000000000000000000000000}
  752.     end
  753.   end
  754.   object Font1Dummy: TMemo
  755.     Left = 5
  756.     Top = 70
  757.     Width = 8
  758.     Height = 9
  759.     Font.Color = clWindowText
  760.     Font.Height = -9
  761.     Font.Name = 'Arial'
  762.     Font.Pitch = fpVariable
  763.     Font.Style = []
  764.     Lines.Strings = (
  765.       'A'
  766.       'B'
  767.       'C'
  768.       'D'
  769.       'E'
  770.       'F'
  771.       'G'
  772.       'H'
  773.       ' '
  774.       'b '
  775.       'c '
  776.       'f '
  777.       'h')
  778.     ParentFont = False
  779.     TabOrder = 8
  780.     OnDblClick = MonthScreenDblClick
  781.     OnDragDrop = MonthScreenImageDragDrop
  782.     OnDragOver = MonthScreenImageDragOver
  783.     OnEndDrag = DailyListBoxEndDrag
  784.     OnKeyDown = MonthScreenKeyDown
  785.     OnKeyPress = MonthScreenKeyPress
  786.     OnMouseDown = MonthScreenImageMouseDown
  787.   end
  788.   object DateBox: TMaskEdit
  789.     Left = 576
  790.     Top = 20
  791.     Width = 60
  792.     Height = 23
  793.     MaxLength = 0
  794.     TabOrder = 9
  795.     Visible = False
  796.   end
  797.   object PhoneListBox: TGroupBox
  798.     Left = 236
  799.     Top = 212
  800.     Width = 151
  801.     Height = 77
  802.     HelpContext = 201
  803.     Caption = 'PhoneListBox'
  804.     ParentShowHint = False
  805.     ShowHint = False
  806.     TabOrder = 11
  807.     OnDblClick = PhoneListBoxDblClick
  808.     object PhoneList: TListBox
  809.       Left = 6
  810.       Top = 18
  811.       Width = 53
  812.       Height = 51
  813.       HelpContext = 201
  814.       ItemHeight = 15
  815.       MultiSelect = True
  816.       ParentShowHint = False
  817.       ShowHint = False
  818.       Sorted = True
  819.       TabOrder = 1
  820.       OnClick = PhoneListClick
  821.       OnDblClick = phoneListDblClick
  822.       OnExit = PhoneListExit
  823.       OnKeyDown = MonthScreenKeyDown
  824.       OnKeyPress = MonthScreenKeyPress
  825.       OnMouseDown = MonthScreenImageMouseDown
  826.     end
  827.     object PhoneListMemo: TListBox
  828.       Left = 72
  829.       Top = 16
  830.       Width = 69
  831.       Height = 55
  832.       HelpContext = 201
  833.       Font.Color = clWindowText
  834.       Font.Height = -11
  835.       Font.Name = 'System'
  836.       Font.Pitch = fpFixed
  837.       Font.Style = []
  838.       ItemHeight = 15
  839.       ParentFont = False
  840.       ParentShowHint = False
  841.       ShowHint = False
  842.       TabOrder = 2
  843.     end
  844.     object PhoneListKey: TEdit
  845.       Left = 84
  846.       Top = 1
  847.       Width = 65
  848.       Height = 20
  849.       HelpContext = 201
  850.       Font.Color = clWindowText
  851.       Font.Height = -13
  852.       Font.Name = 'Terminal'
  853.       Font.Pitch = fpFixed
  854.       Font.Style = []
  855.       ParentFont = False
  856.       ParentShowHint = False
  857.       ShowHint = True
  858.       TabOrder = 0
  859.       OnExit = PhoneListKeyExit
  860.       OnKeyPress = PhoneListKeyKeyPress
  861.     end
  862.   end
  863.   object memoBox: TGroupBox
  864.     Left = 32
  865.     Top = 212
  866.     Width = 197
  867.     Height = 75
  868.     Caption = 'memoBox'
  869.     Color = clWhite
  870.     Font.Color = clBlack
  871.     Font.Height = -11
  872.     Font.Name = 'System'
  873.     Font.Pitch = fpFixed
  874.     Font.Style = []
  875.     ParentColor = False
  876.     ParentFont = False
  877.     TabOrder = 10
  878.     Visible = False
  879.     object memoUpDnBtn: TButton
  880.       Left = 90
  881.       Top = 0
  882.       Width = 17
  883.       Height = 17
  884.       Caption = 'Up'
  885.       Font.Color = clWindowText
  886.       Font.Height = -11
  887.       Font.Name = 'Terminal'
  888.       Font.Pitch = fpFixed
  889.       Font.Style = []
  890.       ParentFont = False
  891.       TabOrder = 0
  892.       TabStop = False
  893.       OnClick = MemoDblClick
  894.     end
  895.     object Memo: TMemo
  896.       Left = 2
  897.       Top = 17
  898.       Width = 193
  899.       Height = 56
  900.       Align = alClient
  901.       Color = clLime
  902.       Font.Color = clBlack
  903.       Font.Height = -9
  904.       Font.Name = 'System'
  905.       Font.Pitch = fpFixed
  906.       Font.Style = []
  907.       Lines.Strings = (
  908.         'Memo')
  909.       ParentFont = False
  910.       ScrollBars = ssVertical
  911.       TabOrder = 1
  912.       OnDblClick = MemoDblClick
  913.       OnEnter = MemoEnter
  914.       OnExit = memoExit
  915.       OnKeyDown = MonthScreenKeyDown
  916.     end
  917.   end
  918.   object MainMenu: TMainMenu
  919.     Left = 148
  920.     Top = 48
  921.     object MainMenuFile: TMenuItem
  922.       Caption = '&File'
  923.       HelpContext = 202
  924.       ShortCut = 0
  925.       object FileMake: TMenuItem
  926.         Caption = '&Make New Event'
  927.         HelpContext = 202
  928.         ShortCut = 0
  929.         OnClick = FileMakeEditClick
  930.       end
  931.       object FileEdit: TMenuItem
  932.         Caption = '&Edit Old Event'
  933.         HelpContext = 204
  934.         ShortCut = 0
  935.         OnClick = FileMakeEditClick
  936.       end
  937.       object FileClone: TMenuItem
  938.         Caption = '&Clone an Event'
  939.         HelpContext = 206
  940.         ShortCut = 0
  941.         OnClick = FileMakeEditClick
  942.       end
  943.       object FilePlan: TMenuItem
  944.         Caption = '&Plan'
  945.         HelpContext = 210
  946.         ShortCut = 0
  947.         OnClick = EditPlanClick
  948.       end
  949.       object FileTemplate: TMenuItem
  950.         Caption = '&Template'
  951.         HelpContext = 208
  952.         ShortCut = 0
  953.         OnClick = EditTemplateClick
  954.       end
  955.       object FileMacro: TMenuItem
  956.         Caption = '&AutoExecute Macro'
  957.         ShortCut = 0
  958.         Visible = False
  959.       end
  960.       object FileIncExp: TMenuItem
  961.         Caption = '&Income/Expense Categories'
  962.         ShortCut = 0
  963.         Visible = False
  964.       end
  965.       object FileZip: TMenuItem
  966.         Caption = '&Zip Schedule to Log'
  967.         HelpContext = 212
  968.         ShortCut = 0
  969.         OnClick = FileMakeEditClick
  970.       end
  971.       object FileArchive: TMenuItem
  972.         Caption = '&Archive Calendar'
  973.         HelpContext = 214
  974.         ShortCut = 0
  975.         OnClick = ToolsDeleteClick
  976.       end
  977.       object N2: TMenuItem
  978.         Caption = '-'
  979.         ShortCut = 0
  980.       end
  981.       object FileDelete: TMenuItem
  982.         Caption = '&Omit Tagged Events'
  983.         HelpContext = 216
  984.         ShortCut = 0
  985.         OnClick = ToolsDeleteClick
  986.       end
  987.       object FileIndex: TMenuItem
  988.         Caption = 'Re&index Data Files'
  989.         HelpContext = 218
  990.         ShortCut = 0
  991.         OnClick = ToolsDeleteClick
  992.       end
  993.       object FileBuild: TMenuItem
  994.         Caption = 'Re&build Data Files'
  995.         HelpContext = 220
  996.         ShortCut = 0
  997.         OnClick = ToolsDeleteClick
  998.       end
  999.       object N13: TMenuItem
  1000.         Caption = '-'
  1001.         ShortCut = 0
  1002.       end
  1003.       object FilePrint: TMenuItem
  1004.         Caption = '&Print'
  1005.         HelpContext = 227
  1006.         ShortCut = 0
  1007.         OnClick = FilePrintClick
  1008.       end
  1009.       object FilePrintHalfYear: TMenuItem
  1010.         Caption = 'Print Half Year'
  1011.         HelpContext = 227
  1012.         ShortCut = 0
  1013.         OnClick = FilePrintYearClick
  1014.       end
  1015.       object FilePrintYear: TMenuItem
  1016.         Caption = 'Print Year'
  1017.         HelpContext = 227
  1018.         ShortCut = 0
  1019.         OnClick = FilePrintYearClick
  1020.       end
  1021.       object PrintCheck: TMenuItem
  1022.         Caption = 'Print &Checks'
  1023.         HelpContext = 225
  1024.         ShortCut = 0
  1025.         OnClick = FileMakeEditClick
  1026.       end
  1027.       object FilePrinterSetup: TMenuItem
  1028.         Caption = '&Printer Setup'
  1029.         ShortCut = 0
  1030.         OnClick = FilePrinterSetupClick
  1031.       end
  1032.       object N12: TMenuItem
  1033.         Caption = '-'
  1034.         ShortCut = 0
  1035.       end
  1036.       object MainMenuExit: TMenuItem
  1037.         Caption = 'E&xit'
  1038.         ShortCut = 0
  1039.         OnClick = MainMenuExitClick
  1040.       end
  1041.     end
  1042.     object MainMenuEdit: TMenuItem
  1043.       Caption = '&Edit'
  1044.       HelpContext = 230
  1045.       ShortCut = 0
  1046.       object EditOldEvent: TMenuItem
  1047.         Caption = 'Old &Event'
  1048.         HelpContext = 230
  1049.         ShortCut = 0
  1050.         OnClick = FileMakeEditClick
  1051.       end
  1052.       object EditRecurs: TMenuItem
  1053.         Caption = '&Recurring Events'
  1054.         HelpContext = 232
  1055.         ShortCut = 0
  1056.         OnClick = EditRecursClick
  1057.       end
  1058.       object EditPrjct: TMenuItem
  1059.         Caption = '&Project'
  1060.         HelpContext = 286
  1061.         ShortCut = 0
  1062.         OnClick = PrjctEditClick
  1063.       end
  1064.       object EditPlan: TMenuItem
  1065.         Caption = 'Pla&n'
  1066.         HelpContext = 210
  1067.         ShortCut = 0
  1068.         OnClick = EditPlanClick
  1069.       end
  1070.       object EditTemplate: TMenuItem
  1071.         Caption = '&Template'
  1072.         HelpContext = 208
  1073.         ShortCut = 0
  1074.         OnClick = EditTemplateClick
  1075.       end
  1076.       object EditIncExpCat: TMenuItem
  1077.         Caption = '&Income/Expense Categories'
  1078.         HelpContext = 233
  1079.         ShortCut = 0
  1080.         OnClick = EditIncExpCatClick
  1081.       end
  1082.       object EditAccounts: TMenuItem
  1083.         Caption = '&Accounts'
  1084.         HelpContext = 235
  1085.         ShortCut = 0
  1086.         OnClick = EditAccountsClick
  1087.       end
  1088.       object EditBillFormat: TMenuItem
  1089.         Caption = '&Bill Format'
  1090.         HelpContext = 680
  1091.         ShortCut = 0
  1092.         OnClick = AccessEditor
  1093.       end
  1094.       object EditLetter: TMenuItem
  1095.         Caption = 'Project Report For&m'
  1096.         HelpContext = 680
  1097.         ShortCut = 0
  1098.         OnClick = AccessEditor
  1099.       end
  1100.       object EditCalForm: TMenuItem
  1101.         Caption = 'Calendar Report'
  1102.         HelpContext = 680
  1103.         ShortCut = 0
  1104.         OnClick = AccessEditor
  1105.       end
  1106.       object EditLogForm: TMenuItem
  1107.         Caption = 'Log Report'
  1108.         HelpContext = 680
  1109.         ShortCut = 0
  1110.         OnClick = AccessEditor
  1111.       end
  1112.       object EditCheck: TMenuItem
  1113.         Caption = 'C&heck Format'
  1114.         ShortCut = 0
  1115.         OnClick = AccessEditor
  1116.       end
  1117.       object EditMacro: TMenuItem
  1118.         Caption = '&AutoExecute Macro'
  1119.         ShortCut = 0
  1120.         Visible = False
  1121.       end
  1122.       object EditConfig: TMenuItem
  1123.         Caption = '&Configuration'
  1124.         HelpContext = 234
  1125.         ShortCut = 0
  1126.         OnClick = EditConfigurationClick
  1127.       end
  1128.       object N4: TMenuItem
  1129.         Caption = '-'
  1130.         ShortCut = 0
  1131.       end
  1132.       object EditDeleteTag: TMenuItem
  1133.         Caption = '&Tag Event for Deletion'
  1134.         HelpContext = 236
  1135.         ShortCut = 0
  1136.         OnClick = FileMakeEditClick
  1137.       end
  1138.       object N3: TMenuItem
  1139.         Caption = '-'
  1140.         ShortCut = 0
  1141.       end
  1142.       object EditFindWord: TMenuItem
  1143.         Caption = '&Find Word'
  1144.         ShortCut = 0
  1145.         OnClick = EditFindWordClick
  1146.       end
  1147.       object EditCut: TMenuItem
  1148.         Caption = 'Cu&t'
  1149.         ShortCut = 0
  1150.         OnClick = EditCutClick
  1151.       end
  1152.       object EditCopy: TMenuItem
  1153.         Caption = 'C&opy to Clipboard'
  1154.         ShortCut = 0
  1155.         OnClick = EditCopyClick
  1156.       end
  1157.       object EditPaste: TMenuItem
  1158.         Caption = '&Paste'
  1159.         ShortCut = 0
  1160.         OnClick = EditPasteClick
  1161.       end
  1162.       object EditMoveEvents: TMenuItem
  1163.         Caption = 'Move Events'
  1164.         ShortCut = 0
  1165.         OnClick = EditMoveEventsClick
  1166.       end
  1167.     end
  1168.     object MainMenuSearch: TMenuItem
  1169.       Caption = '&Search'
  1170.       HelpContext = 250
  1171.       ShortCut = 0
  1172.       object SearchReport: TMenuItem
  1173.         Caption = '&Report'
  1174.         HelpContext = 250
  1175.         ShortCut = 0
  1176.         OnClick = SearchReportClick
  1177.       end
  1178.       object N1: TMenuItem
  1179.         Caption = '-'
  1180.         ShortCut = 0
  1181.       end
  1182.       object SearchQuick: TMenuItem
  1183.         Caption = 'Locate a Word Quickly'
  1184.         HelpContext = 252
  1185.         ShortCut = 0
  1186.         OnClick = SearchReportClick
  1187.       end
  1188.       object SearchGoTo: TMenuItem
  1189.         Caption = '&Go To Date'
  1190.         HelpContext = 254
  1191.         ShortCut = 0
  1192.         OnClick = ToolsDeleteClick
  1193.       end
  1194.       object SearchFreeTime: TMenuItem
  1195.         Caption = 'Find Free Time'
  1196.         HelpContext = 256
  1197.         ShortCut = 0
  1198.         OnClick = FileMakeEditClick
  1199.       end
  1200.       object N11: TMenuItem
  1201.         Caption = '-'
  1202.         ShortCut = 0
  1203.       end
  1204.       object SearchAdd: TMenuItem
  1205.         Caption = '&Add Days'
  1206.         HelpContext = 258
  1207.         ShortCut = 0
  1208.         OnClick = ToolsDeleteClick
  1209.       end
  1210.       object SearchSubtract: TMenuItem
  1211.         Caption = '&Subtract Days'
  1212.         HelpContext = 260
  1213.         ShortCut = 0
  1214.         OnClick = ToolsDeleteClick
  1215.       end
  1216.     end
  1217.     object MenuSchedLog: TMenuItem
  1218.       Caption = '&Log'
  1219.       HelpContext = 280
  1220.       ShortCut = 0
  1221.       object FileSwitch: TMenuItem
  1222.         Caption = '&Switch to'
  1223.         HelpContext = 280
  1224.         ShortCut = 0
  1225.         OnClick = FileSwitchClick
  1226.       end
  1227.     end
  1228.     object MainMenuView: TMenuItem
  1229.       Caption = '&View'
  1230.       HelpContext = 270
  1231.       ShortCut = 0
  1232.       object ViewDay: TMenuItem
  1233.         Caption = '&Day/Month'
  1234.         HelpContext = 270
  1235.         ShortCut = 0
  1236.         OnClick = FileMakeEditClick
  1237.       end
  1238.       object AltMonthView: TMenuItem
  1239.         Caption = '&Alternate Month View'
  1240.         HelpContext = 271
  1241.         ShortCut = 0
  1242.         OnClick = AltMonthViewClick
  1243.       end
  1244.       object ViewWeek: TMenuItem
  1245.         Caption = '&Week'
  1246.         ShortCut = 0
  1247.         OnClick = ViewWeekClick
  1248.       end
  1249.       object ViewSixMonth: TMenuItem
  1250.         Caption = '&Six-Month'
  1251.         ShortCut = 0
  1252.         Visible = False
  1253.       end
  1254.       object ViewToDo: TMenuItem
  1255.         Caption = '&ToDo'#39's'
  1256.         HelpContext = 272
  1257.         ShortCut = 0
  1258.         OnClick = FileMakeEditClick
  1259.       end
  1260.       object N5: TMenuItem
  1261.         Caption = '-'
  1262.         ShortCut = 0
  1263.         Visible = False
  1264.       end
  1265.       object ViewReport: TMenuItem
  1266.         Caption = '&Report'
  1267.         ShortCut = 0
  1268.         Visible = False
  1269.         OnClick = SearchReportClick
  1270.       end
  1271.       object N7: TMenuItem
  1272.         Caption = '-'
  1273.         ShortCut = 0
  1274.         Visible = False
  1275.       end
  1276.       object ViewWorldTimes: TMenuItem
  1277.         Caption = '&World Times'
  1278.         HelpContext = 274
  1279.         ShortCut = 0
  1280.         OnClick = ViewWorldTimesClick
  1281.       end
  1282.       object ViewMiscel: TMenuItem
  1283.         Caption = '&Miscellaneous Info'
  1284.         ShortCut = 0
  1285.         Visible = False
  1286.       end
  1287.       object ViewStopwatch: TMenuItem
  1288.         Caption = '&Stopwatch'
  1289.         ShortCut = 0
  1290.         Visible = False
  1291.       end
  1292.       object N6: TMenuItem
  1293.         Caption = '-'
  1294.         ShortCut = 0
  1295.       end
  1296.       object ViewEmp: TMenuItem
  1297.         Caption = '&One Employee/Project'
  1298.         HelpContext = 276
  1299.         ShortCut = 0
  1300.         OnClick = ViewEmpClick
  1301.       end
  1302.     end
  1303.     object MainMenuProj: TMenuItem
  1304.       Caption = '&Project'
  1305.       HelpContext = 284
  1306.       ShortCut = 0
  1307.       object PrjctMake: TMenuItem
  1308.         Caption = '&Make'
  1309.         HelpContext = 284
  1310.         ShortCut = 0
  1311.         OnClick = PrjctEditClick
  1312.       end
  1313.       object PrjctEdit: TMenuItem
  1314.         Caption = '&Edit'
  1315.         HelpContext = 286
  1316.         ShortCut = 0
  1317.         OnClick = PrjctEditClick
  1318.       end
  1319.       object PrjctHunt: TMenuItem
  1320.         Caption = '&Report / Bill'
  1321.         HelpContext = 287
  1322.         ShortCut = 0
  1323.         OnClick = PrjctHuntClick
  1324.       end
  1325.       object PrjctTag: TMenuItem
  1326.         Caption = '&Tag for Omission'
  1327.         HelpContext = 288
  1328.         ShortCut = 0
  1329.         OnClick = PrjctEditClick
  1330.       end
  1331.     end
  1332.     object MenuGenLedger: TMenuItem
  1333.       Caption = 'GenLedger'
  1334.       ShortCut = 0
  1335.       object GenLedgSwitch: TMenuItem
  1336.         Caption = '&SwitchTo'
  1337.         ShortCut = 0
  1338.         OnClick = FileSwitchClick
  1339.       end
  1340.     end
  1341.     object MainMenuInterOffice: TMenuItem
  1342.       Caption = '&InterOffice'
  1343.       ShortCut = 0
  1344.       object DataNotebook: TMenuItem
  1345.         Caption = '&Notebook'
  1346.         HelpContext = 291
  1347.         ShortCut = 0
  1348.         Visible = False
  1349.         OnClick = DataNotebookClick
  1350.       end
  1351.       object DataPhonebook: TMenuItem
  1352.         Caption = '&Phonebook'
  1353.         HelpContext = 289
  1354.         ShortCut = 0
  1355.         OnClick = DatabaseClick
  1356.       end
  1357.       object DataPayees: TMenuItem
  1358.         Caption = 'Payees'
  1359.         HelpContext = 290
  1360.         ShortCut = 0
  1361.         OnClick = DatabaseClick
  1362.       end
  1363.       object InterOfficeSend: TMenuItem
  1364.         Caption = '&Send Mail'
  1365.         ShortCut = 0
  1366.         Visible = False
  1367.       end
  1368.       object InterOfficeLocate: TMenuItem
  1369.         Caption = '&Locate Person'
  1370.         ShortCut = 0
  1371.         Visible = False
  1372.       end
  1373.     end
  1374.     object MainMenuTools: TMenuItem
  1375.       Caption = '&Tools'
  1376.       HelpContext = 292
  1377.       ShortCut = 0
  1378.       object ToolsCalc: TMenuItem
  1379.         Caption = '&Date Calculator'
  1380.         HelpContext = 292
  1381.         ShortCut = 0
  1382.         OnClick = ToolsDeleteClick
  1383.       end
  1384.       object ToolsMacro: TMenuItem
  1385.         Caption = 'Autoexecute &Macro'
  1386.         ShortCut = 0
  1387.         Visible = False
  1388.       end
  1389.       object ToolsResched: TMenuItem
  1390.         Caption = '&Re-Schedule Multiple Events'
  1391.         ShortCut = 0
  1392.         Visible = False
  1393.       end
  1394.       object ToolsZip: TMenuItem
  1395.         Caption = '&Zip Schedule to Log'
  1396.         ShortCut = 0
  1397.         Visible = False
  1398.         OnClick = FileMakeEditClick
  1399.       end
  1400.       object ToolChangePW: TMenuItem
  1401.         Caption = 'Change &Password'
  1402.         HelpContext = 296
  1403.         ShortCut = 0
  1404.         OnClick = ToolChangePWClick
  1405.       end
  1406.       object ToolsColors: TMenuItem
  1407.         Caption = 'Change Colors'
  1408.         HelpContext = 238
  1409.         ShortCut = 0
  1410.         OnClick = ToolsColorsClick
  1411.       end
  1412.       object ToolsTimeZoneChange: TMenuItem
  1413.         Caption = 'Change Time Zone'
  1414.         ShortCut = 0
  1415.         OnClick = ViewWorldTimesClick
  1416.       end
  1417.       object ToolEditConfig: TMenuItem
  1418.         Caption = 'Edit &Configuration'
  1419.         HelpContext = 294
  1420.         ShortCut = 0
  1421.         OnClick = EditConfigurationClick
  1422.       end
  1423.       object N8: TMenuItem
  1424.         Caption = '-'
  1425.         ShortCut = 0
  1426.       end
  1427.       object ToolOptions: TMenuItem
  1428.         Caption = '&Options'
  1429.         HelpContext = 298
  1430.         ShortCut = 0
  1431.         object ToolOptionsBatchEntry: TMenuItem
  1432.           Caption = 'Batch Entry Mode'
  1433.           HelpContext = 298
  1434.           ShortCut = 0
  1435.           OnClick = ToolOptionsSwitch
  1436.         end
  1437.         object ToolOptionsBatchHunt: TMenuItem
  1438.           Caption = 'Batch Hunt Mode'
  1439.           HelpContext = 298
  1440.           ShortCut = 0
  1441.           OnClick = ToolOptionsSwitch
  1442.         end
  1443.       end
  1444.     end
  1445.     object MainMenuHelp: TMenuItem
  1446.       Caption = '&Help'
  1447.       ShortCut = 0
  1448.       object HelpQuickHelp: TMenuItem
  1449.         Caption = '&Quick Help'
  1450.         ShortCut = 112
  1451.         OnClick = HelpQuickHelpClick
  1452.       end
  1453.       object HelpManual: TMenuItem
  1454.         Caption = '&Print Manual'
  1455.         ShortCut = 0
  1456.         Visible = False
  1457.       end
  1458.       object HelpAbout: TMenuItem
  1459.         Caption = '&About'
  1460.         ShortCut = 0
  1461.         OnClick = HelpAboutClick
  1462.       end
  1463.     end
  1464.   end
  1465.   object Timer1: TTimer
  1466.     OnTimer = Timer1Timer
  1467.     Left = 198
  1468.     Top = 44
  1469.   end
  1470.   object PrinterSetupDialog1: TPrinterSetupDialog
  1471.     Left = 228
  1472.     Top = 48
  1473.   end
  1474.   object OpenDialog1: TOpenDialog
  1475.     FileEditStyle = fsEdit
  1476.     Options = [ofHideReadOnly, ofNoChangeDir, ofCreatePrompt]
  1477.     Left = 204
  1478.     Top = 78
  1479.   end
  1480. end
  1481.