home *** CD-ROM | disk | FTP | other *** search
/ Mundo do CD-ROM 17 / CDROM17.iso / faq / aide / _SETUP.1 / ModemLog.exe / 0 / RCDATA / TFORM1 / TFORM1.txt
Encoding:
Text File  |  1997-10-28  |  27.1 KB  |  891 lines
  1. object Form1: TForm1
  2.   Left = 108
  3.   Top = 90
  4.   Width = 640
  5.   Height = 480
  6.   Caption = 'Form1'
  7.   Font.Color = clWindowText
  8.   Font.Height = -11
  9.   Font.Name = 'MS Sans Serif'
  10.   Font.Style = []
  11.   Menu = MainMenu1
  12.   Position = poScreenCenter
  13.   OnClose = FormClose
  14.   OnCreate = FormCreate
  15.   OnShow = FormShow
  16.   PixelsPerInch = 96
  17.   TextHeight = 13
  18.   object StatusBar1: TStatusBar
  19.     Left = 0
  20.     Top = 415
  21.     Width = 632
  22.     Height = 19
  23.     Panels = <>
  24.     SimplePanel = True
  25.   end
  26.   object PageControl1: TPageControl
  27.     Tag = 2
  28.     Left = 0
  29.     Top = 57
  30.     Width = 632
  31.     Height = 358
  32.     ActivePage = TabSheet2
  33.     Align = alClient
  34.     ParentShowHint = False
  35.     ShowHint = True
  36.     TabOrder = 1
  37.     OnChange = PageControl1Change
  38.     object TabSheet1: TTabSheet
  39.       Tag = 1
  40.       Caption = 'Costs Analysis'
  41.       object GroupBox4: TGroupBox
  42.         Left = 280
  43.         Top = 96
  44.         Width = 329
  45.         Height = 81
  46.         TabOrder = 0
  47.         object Label8: TLabel
  48.           Left = 8
  49.           Top = 24
  50.           Width = 125
  51.           Height = 13
  52.           Caption = 'If you had always called at'
  53.         end
  54.         object Label10: TLabel
  55.           Left = 144
  56.           Top = 24
  57.           Width = 69
  58.           Height = 13
  59.           Caption = 'lowest charge:'
  60.         end
  61.         object Label11: TLabel
  62.           Left = 140
  63.           Top = 48
  64.           Width = 73
  65.           Height = 13
  66.           Caption = 'highest charge:'
  67.         end
  68.         object lblLowestCost: TLabel
  69.           Left = 216
  70.           Top = 24
  71.           Width = 3
  72.           Height = 13
  73.           Hint = 
  74.             'This is how much the cost for the selected period would have bee' +
  75.             'n if you had only called at the lowest charge'
  76.           Font.Color = clMaroon
  77.           Font.Height = -11
  78.           Font.Name = 'MS Sans Serif'
  79.           Font.Style = []
  80.           ParentFont = False
  81.           ParentShowHint = False
  82.           ShowHint = False
  83.         end
  84.         object lblHighestCost: TLabel
  85.           Left = 216
  86.           Top = 48
  87.           Width = 3
  88.           Height = 13
  89.           Hint = 
  90.             'This is how much the cost for the selected period would have bee' +
  91.             'n if you had only called at the highest charge'
  92.           Font.Color = clMaroon
  93.           Font.Height = -11
  94.           Font.Name = 'MS Sans Serif'
  95.           Font.Style = []
  96.           ParentFont = False
  97.           ParentShowHint = False
  98.           ShowHint = False
  99.         end
  100.       end
  101.       object GroupBox5: TGroupBox
  102.         Left = 280
  103.         Top = 208
  104.         Width = 329
  105.         Height = 81
  106.         TabOrder = 1
  107.         object Label12: TLabel
  108.           Left = 88
  109.           Top = 24
  110.           Width = 138
  111.           Height = 13
  112.           Caption = 'Estimated cost for this month:'
  113.         end
  114.         object Label13: TLabel
  115.           Left = 14
  116.           Top = 44
  117.           Width = 212
  118.           Height = 13
  119.           Caption = 'Average monthly cost during selected period:'
  120.         end
  121.         object lblEstimatedMonthlyCost: TLabel
  122.           Left = 232
  123.           Top = 24
  124.           Width = 3
  125.           Height = 13
  126.           Hint = 
  127.             'This is how much the cost for this month is expected to be based' +
  128.             ' on calls made so far'
  129.           Font.Color = clMaroon
  130.           Font.Height = -11
  131.           Font.Name = 'MS Sans Serif'
  132.           Font.Style = []
  133.           ParentFont = False
  134.           ParentShowHint = False
  135.           ShowHint = False
  136.         end
  137.         object lblMonthlyCostDuringPeriod: TLabel
  138.           Left = 232
  139.           Top = 44
  140.           Width = 3
  141.           Height = 13
  142.           Hint = 
  143.             'This is how much the calculated monthly cost has been for the se' +
  144.             'lected period'
  145.           Font.Color = clMaroon
  146.           Font.Height = -11
  147.           Font.Name = 'MS Sans Serif'
  148.           Font.Style = []
  149.           ParentFont = False
  150.           ParentShowHint = False
  151.           ShowHint = False
  152.         end
  153.       end
  154.     end
  155.     object TabSheet2: TTabSheet
  156.       Tag = 2
  157.       Caption = 'Logbook Report'
  158.       object Label1: TLabel
  159.         Tag = 9
  160.         Left = 8
  161.         Top = 24
  162.         Width = 113
  163.         Height = 13
  164.         Caption = 'Report Period Between:'
  165.       end
  166.       object Label9: TLabel
  167.         Tag = 9
  168.         Left = 104
  169.         Top = 56
  170.         Width = 18
  171.         Height = 13
  172.         Caption = 'and'
  173.       end
  174.       object RichEdit1: TRichEdit
  175.         Left = 280
  176.         Top = 16
  177.         Width = 329
  178.         Height = 297
  179.         ReadOnly = True
  180.         ScrollBars = ssVertical
  181.         TabOrder = 0
  182.       end
  183.       object comboboxFromDate: TComboBox
  184.         Tag = 9
  185.         Left = 8
  186.         Top = 48
  187.         Width = 81
  188.         Height = 21
  189.         Hint = 'Set Beginning of Report Period to this date'
  190.         ItemHeight = 13
  191.         ParentShowHint = False
  192.         ShowHint = False
  193.         TabOrder = 1
  194.         OnExit = comboboxFromDateExit
  195.       end
  196.       object btnCreate: TBitBtn
  197.         Tag = 9
  198.         Left = 72
  199.         Top = 104
  200.         Width = 105
  201.         Height = 25
  202.         Hint = 'Create a Report for the Period given above'
  203.         Caption = '&Create Report'
  204.         ParentShowHint = False
  205.         ShowHint = False
  206.         TabOrder = 2
  207.         OnClick = btnCreateClick
  208.         Glyph.Data = {
  209.           78010000424D7801000000000000760000002800000020000000100000000100
  210.           04000000000000000000120B0000120B00000000000000000000000000000000
  211.           800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  212.           FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333330000000
  213.           00003333377777777777333330FFFFFFFFF03FF3F7FFFF33FFF7003000000FF0
  214.           00F077F7777773F77737E00FBFBFB0FFFFF07773333FF7FF33F7E0FBFB00000F
  215.           F0F077F333777773F737E0BFBFBFBFB0FFF077F3333FFFF733F7E0FBFB00000F
  216.           F0F077F333777773F737E0BFBFBFBFB0FFF077F33FFFFFF733F7E0FB0000000F
  217.           F0F077FF777777733737000FB0FFFFFFFFF07773F7F333333337333000FFFFFF
  218.           FFF0333777F3FFF33FF7333330F000FF0000333337F777337777333330FFFFFF
  219.           0FF0333337FFFFFF7F37333330CCCCCC0F033333377777777F73333330FFFFFF
  220.           0033333337FFFFFF7733333330000000033333333777777773330000}
  221.         NumGlyphs = 2
  222.       end
  223.       object comboboxToDate: TComboBox
  224.         Tag = 9
  225.         Left = 144
  226.         Top = 48
  227.         Width = 89
  228.         Height = 21
  229.         Hint = 'Set End of Report Period to this date'
  230.         ItemHeight = 13
  231.         ParentShowHint = False
  232.         ShowHint = False
  233.         TabOrder = 3
  234.         OnExit = comboboxFromDateExit
  235.       end
  236.       object GroupBox3: TGroupBox
  237.         Tag = 9
  238.         Left = 8
  239.         Top = 160
  240.         Width = 257
  241.         Height = 153
  242.         TabOrder = 4
  243.         object Label2: TLabel
  244.           Left = 80
  245.           Top = 24
  246.           Width = 33
  247.           Height = 13
  248.           Caption = 'Period:'
  249.         end
  250.         object Label4: TLabel
  251.           Left = 36
  252.           Top = 46
  253.           Width = 77
  254.           Height = 13
  255.           Caption = 'Number of Calls:'
  256.         end
  257.         object lblPeriod: TLabel
  258.           Left = 120
  259.           Top = 24
  260.           Width = 3
  261.           Height = 13
  262.           Hint = 'Dates of the First and Last Call during the Period given above'
  263.           Font.Color = clBlack
  264.           Font.Height = -11
  265.           Font.Name = 'MS Sans Serif'
  266.           Font.Style = []
  267.           ParentFont = False
  268.           ParentShowHint = False
  269.           ShowHint = False
  270.         end
  271.         object lblNumberOfCalls: TLabel
  272.           Left = 120
  273.           Top = 46
  274.           Width = 3
  275.           Height = 13
  276.           Hint = 'Number of Calls during the Period given above'
  277.           Font.Color = clPurple
  278.           Font.Height = -11
  279.           Font.Name = 'MS Sans Serif'
  280.           Font.Style = []
  281.           ParentFont = False
  282.           ParentShowHint = False
  283.           ShowHint = False
  284.         end
  285.         object Label5: TLabel
  286.           Left = 6
  287.           Top = 68
  288.           Width = 107
  289.           Height = 13
  290.           Caption = 'Average Time per Call:'
  291.         end
  292.         object lblAverageCallingTime: TLabel
  293.           Left = 120
  294.           Top = 68
  295.           Width = 3
  296.           Height = 13
  297.           Hint = 'Average time per Call during the Period given above'
  298.           Font.Color = clNavy
  299.           Font.Height = -11
  300.           Font.Name = 'MS Sans Serif'
  301.           Font.Style = []
  302.           ParentFont = False
  303.           ParentShowHint = False
  304.           ShowHint = False
  305.         end
  306.         object Label6: TLabel
  307.           Left = 62
  308.           Top = 112
  309.           Width = 51
  310.           Height = 13
  311.           Caption = 'Total Cost:'
  312.         end
  313.         object Label7: TLabel
  314.           Left = 8
  315.           Top = 90
  316.           Width = 105
  317.           Height = 13
  318.           Caption = 'Average Cost per Call:'
  319.         end
  320.         object lblAverageCost: TLabel
  321.           Left = 120
  322.           Top = 90
  323.           Width = 3
  324.           Height = 13
  325.           Hint = 'Average Cost per Call during the Period given above'
  326.           Font.Color = clMaroon
  327.           Font.Height = -11
  328.           Font.Name = 'MS Sans Serif'
  329.           Font.Style = []
  330.           ParentFont = False
  331.           ParentShowHint = False
  332.           ShowHint = False
  333.         end
  334.         object lblTotalCost: TLabel
  335.           Left = 120
  336.           Top = 112
  337.           Width = 3
  338.           Height = 13
  339.           Hint = 'Total Cost per Call during the Period given above'
  340.           Font.Color = clMaroon
  341.           Font.Height = -11
  342.           Font.Name = 'MS Sans Serif'
  343.           Font.Style = []
  344.           ParentFont = False
  345.           ParentShowHint = False
  346.           ShowHint = False
  347.         end
  348.       end
  349.       object ProgressBar1: TProgressBar
  350.         Tag = 9
  351.         Left = 49
  352.         Top = 136
  353.         Width = 150
  354.         Height = 16
  355.         Min = 0
  356.         Max = 100
  357.         TabOrder = 5
  358.       end
  359.     end
  360.     object TabSheet3: TTabSheet
  361.       Tag = 3
  362.       Caption = 'Options'
  363.       object GroupBox1: TGroupBox
  364.         Left = 8
  365.         Top = 8
  366.         Width = 249
  367.         Height = 81
  368.         Caption = 'Windows Modem Log File'
  369.         TabOrder = 0
  370.         object Label3: TLabel
  371.           Left = 8
  372.           Top = 16
  373.           Width = 40
  374.           Height = 13
  375.           Caption = 'Log File:'
  376.         end
  377.         object chkboxDeleteLogFile: TCheckBox
  378.           Left = 8
  379.           Top = 56
  380.           Width = 217
  381.           Height = 17
  382.           Hint = 
  383.             'Deleting the log file generates shorter startup time for Onlinom' +
  384.             'eter'
  385.           Caption = 'Delete log file when done (recommended)'
  386.           ParentShowHint = False
  387.           ShowHint = False
  388.           TabOrder = 0
  389.         end
  390.         object editLogFileName: TEdit
  391.           Left = 8
  392.           Top = 32
  393.           Width = 225
  394.           Height = 21
  395.           TabOrder = 1
  396.         end
  397.       end
  398.       object grpboxOnlineCost: TGroupBox
  399.         Left = 8
  400.         Top = 168
  401.         Width = 609
  402.         Height = 153
  403.         Caption = 'Charges for Online Time'
  404.         Color = clBtnFace
  405.         ParentColor = False
  406.         TabOrder = 1
  407.         object strgrdCost: TStringGrid
  408.           Left = 8
  409.           Top = 16
  410.           Width = 521
  411.           Height = 129
  412.           Hint = 
  413.             'If you are not sure how to fill in this grid, click on the help ' +
  414.             'button at the lower right'
  415.           ColCount = 6
  416.           FixedCols = 0
  417.           RowCount = 2
  418.           Font.Color = clBlack
  419.           Font.Height = -11
  420.           Font.Name = 'MS Sans Serif'
  421.           Font.Style = []
  422.           Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goColSizing, goRowSelect]
  423.           ParentFont = False
  424.           ParentShowHint = False
  425.           ShowHint = False
  426.           TabOrder = 0
  427.           ColWidths = (
  428.             144
  429.             69
  430.             72
  431.             69
  432.             60
  433.             98)
  434.         end
  435.         object btnEdit: TBitBtn
  436.           Left = 536
  437.           Top = 48
  438.           Width = 65
  439.           Height = 25
  440.           Hint = 'Edit entry'
  441.           Caption = '&Edit...'
  442.           ParentShowHint = False
  443.           ShowHint = False
  444.           TabOrder = 1
  445.           OnClick = btnEditClick
  446.           Glyph.Data = {
  447.             78010000424D7801000000000000760000002800000020000000100000000100
  448.             04000000000000000000120B0000120B00000000000000000000000000000000
  449.             800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  450.             FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000000
  451.             000033333377777777773333330FFFFFFFF03FF3FF7FF33F3FF700300000FF0F
  452.             00F077F777773F737737E00BFBFB0FFFFFF07773333F7F3333F7E0BFBF000FFF
  453.             F0F077F3337773F3F737E0FBFBFBF0F00FF077F3333FF7F77F37E0BFBF00000B
  454.             0FF077F3337777737337E0FBFBFBFBF0FFF077F33FFFFFF73337E0BF0000000F
  455.             FFF077FF777777733FF7000BFB00B0FF00F07773FF77373377373330000B0FFF
  456.             FFF03337777373333FF7333330B0FFFF00003333373733FF777733330B0FF00F
  457.             0FF03333737F37737F373330B00FFFFF0F033337F77F33337F733309030FFFFF
  458.             00333377737FFFFF7733333033000000033333373377777773330000}
  459.           NumGlyphs = 2
  460.         end
  461.         object btnNew: TBitBtn
  462.           Left = 536
  463.           Top = 16
  464.           Width = 65
  465.           Height = 25
  466.           Hint = 'New entry'
  467.           Caption = '&New...'
  468.           ParentShowHint = False
  469.           ShowHint = False
  470.           TabOrder = 2
  471.           OnClick = btnNewClick
  472.           Glyph.Data = {
  473.             76010000424D7601000000000000760000002800000020000000100000000100
  474.             04000000000000010000130B0000130B00000000000000000000000000000000
  475.             800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  476.             FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333333B333
  477.             333B33FF33337F3333F73BB3777BB7777BB3377FFFF77FFFF77333B000000000
  478.             0B3333777777777777333330FFFFFFFF07333337F33333337F333330FFFFFFFF
  479.             07333337F33333337F333330FFFFFFFF07333337F33333337F333330FFFFFFFF
  480.             07333FF7F33333337FFFBBB0FFFFFFFF0BB37777F3333333777F3BB0FFFFFFFF
  481.             0BBB3777F3333FFF77773330FFFF000003333337F333777773333330FFFF0FF0
  482.             33333337F3337F37F3333330FFFF0F0B33333337F3337F77FF333330FFFF003B
  483.             B3333337FFFF77377FF333B000000333BB33337777777F3377FF3BB3333BB333
  484.             3BB33773333773333773B333333B3333333B7333333733333337}
  485.           NumGlyphs = 2
  486.         end
  487.         object btnDelete: TBitBtn
  488.           Left = 536
  489.           Top = 80
  490.           Width = 65
  491.           Height = 25
  492.           Hint = 'Delete entry'
  493.           Caption = '&Delete'
  494.           ParentShowHint = False
  495.           ShowHint = False
  496.           TabOrder = 3
  497.           OnClick = btnDeleteClick
  498.           Glyph.Data = {
  499.             78010000424D7801000000000000760000002800000020000000100000000100
  500.             04000000000000000000120B0000120B00000000000000000000000000000000
  501.             800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  502.             FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333000000000
  503.             3333333777777777F3333330F777777033333337F3F3F3F7F3333330F0808070
  504.             33333337F7F7F7F7F3333330F080707033333337F7F7F7F7F3333330F0808070
  505.             33333337F7F7F7F7F3333330F080707033333337F7F7F7F7F3333330F0808070
  506.             333333F7F7F7F7F7F3F33030F080707030333737F7F7F7F7F7333300F0808070
  507.             03333377F7F7F7F773333330F080707033333337F7F7F7F7F333333070707070
  508.             33333337F7F7F7F7FF3333000000000003333377777777777F33330F88877777
  509.             0333337FFFFFFFFF7F3333000000000003333377777777777333333330777033
  510.             3333333337FFF7F33333333330000033333333333777773333330000}
  511.           NumGlyphs = 2
  512.         end
  513.         object BitBtn6: TBitBtn
  514.           Left = 536
  515.           Top = 120
  516.           Width = 65
  517.           Height = 25
  518.           Hint = 'Show Help on how to fill in this grid'
  519.           ParentShowHint = False
  520.           ShowHint = False
  521.           TabOrder = 4
  522.           OnClick = BitBtn6Click
  523.           Kind = bkHelp
  524.         end
  525.       end
  526.       object GroupBox2: TGroupBox
  527.         Left = 280
  528.         Top = 8
  529.         Width = 337
  530.         Height = 81
  531.         Caption = 'Warnings'
  532.         TabOrder = 2
  533.         object editWarnCost: TEdit
  534.           Left = 272
  535.           Top = 12
  536.           Width = 49
  537.           Height = 21
  538.           TabOrder = 0
  539.           Text = '0'
  540.         end
  541.         object chkboxWarnAverageCost: TCheckBox
  542.           Left = 8
  543.           Top = 40
  544.           Width = 249
  545.           Height = 33
  546.           Hint = 
  547.             'Checking this box generates a message when average cost per call' +
  548.             ' has exceed the given amount'
  549.           Caption = 'Warn when average cost per call has exceeded:'
  550.           ParentShowHint = False
  551.           ShowHint = False
  552.           TabOrder = 1
  553.           OnClick = chkboxWarnAverageCostClick
  554.         end
  555.         object editWarnAverageCost: TEdit
  556.           Left = 272
  557.           Top = 44
  558.           Width = 49
  559.           Height = 21
  560.           TabOrder = 2
  561.           Text = '0'
  562.         end
  563.         object chkboxWarnCost: TCheckBox
  564.           Left = 8
  565.           Top = 16
  566.           Width = 257
  567.           Height = 17
  568.           Hint = 
  569.             'Checking this box generates a message when online cost per month' +
  570.             ' has exceed the given amount'
  571.           Caption = 'Warn when cost per month has exceeded:'
  572.           ParentShowHint = False
  573.           ShowHint = False
  574.           TabOrder = 3
  575.           OnClick = chkboxWarnCostClick
  576.         end
  577.       end
  578.       object GroupBox6: TGroupBox
  579.         Left = 8
  580.         Top = 96
  581.         Width = 249
  582.         Height = 65
  583.         Caption = 'Cost Settings'
  584.         TabOrder = 3
  585.         object chkboxIgnoreBusyCalls: TCheckBox
  586.           Left = 8
  587.           Top = 24
  588.           Width = 137
  589.           Height = 17
  590.           Caption = 'Ignore Busy Calls'
  591.           State = cbChecked
  592.           TabOrder = 0
  593.         end
  594.       end
  595.     end
  596.   end
  597.   object Panel1: TPanel
  598.     Left = 0
  599.     Top = 0
  600.     Width = 632
  601.     Height = 57
  602.     Align = alTop
  603.     TabOrder = 2
  604.     object BitBtn1: TBitBtn
  605.       Left = 16
  606.       Top = 8
  607.       Width = 57
  608.       Height = 41
  609.       Hint = 'Exit Application'
  610.       Caption = 'Exit'
  611.       ParentShowHint = False
  612.       ShowHint = True
  613.       TabOrder = 0
  614.       OnClick = Exit1Click
  615.       Kind = bkClose
  616.       Layout = blGlyphTop
  617.     end
  618.     object BitBtn2: TBitBtn
  619.       Left = 96
  620.       Top = 8
  621.       Width = 57
  622.       Height = 41
  623.       Hint = 'Print Logbook Report'
  624.       Caption = 'Print'
  625.       ParentShowHint = False
  626.       ShowHint = True
  627.       TabOrder = 1
  628.       OnClick = Print1Click
  629.       Glyph.Data = {
  630.         78010000424D7801000000000000760000002800000020000000100000000100
  631.         04000000000000000000120B0000120B00000000000000000000000000000000
  632.         800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  633.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
  634.         0003377777777777777308888888888888807F33333333333337088888888888
  635.         88807FFFFFFFFFFFFFF7000000000000000077777777777777770F8F8F8F8F8F
  636.         8F807F333333333333F708F8F8F8F8F8F9F07F333333333337370F8F8F8F8F8F
  637.         8F807FFFFFFFFFFFFFF7000000000000000077777777777777773330FFFFFFFF
  638.         03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF
  639.         03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0
  640.         33333337F3F37F3733333330F08F0F0333333337F7337F7333333330FFFF0033
  641.         33333337FFFF77333333333000000333333333377777733333330000}
  642.       Layout = blGlyphTop
  643.       NumGlyphs = 2
  644.     end
  645.     object BitBtn3: TBitBtn
  646.       Left = 176
  647.       Top = 8
  648.       Width = 57
  649.       Height = 41
  650.       Hint = 'Show Help Contents'
  651.       Caption = 'Help'
  652.       ParentShowHint = False
  653.       ShowHint = True
  654.       TabOrder = 2
  655.       OnClick = Contents1Click
  656.       Glyph.Data = {
  657.         78010000424D7801000000000000760000002800000020000000100000000100
  658.         04000000000000000000120B0000120B00000000000000000000000000000000
  659.         800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  660.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333CCCCC33
  661.         33333FFFF77777FFFFFFCCCCCC808CCCCCC3777777F7F777777F008888070888
  662.         8003777777777777777F0F0770F7F0770F0373F33337F333337370FFFFF7FFFF
  663.         F07337F33337F33337F370FFFB99FBFFF07337F33377F33337F330FFBF99BFBF
  664.         F033373F337733333733370BFBF7FBFB0733337F333FF3337F33370FBF98BFBF
  665.         0733337F3377FF337F333B0BFB990BFB03333373FF777FFF73333FB000B99000
  666.         B33333377737777733333BFBFBFB99FBF33333333FF377F333333FBF99BF99BF
  667.         B333333377F377F3333333FB99FB99FB3333333377FF77333333333FB9999FB3
  668.         333333333777733333333333FBFBFB33333333333333333333330000}
  669.       Layout = blGlyphTop
  670.       NumGlyphs = 2
  671.     end
  672.     object BitBtn4: TBitBtn
  673.       Left = 304
  674.       Top = 8
  675.       Width = 57
  676.       Height = 41
  677.       Hint = 'Show About Box'
  678.       Caption = 'About'
  679.       ParentShowHint = False
  680.       ShowHint = True
  681.       TabOrder = 3
  682.       OnClick = About1Click
  683.       Glyph.Data = {
  684.         76010000424D7601000000000000760000002800000020000000100000000100
  685.         04000000000000010000130B0000130B00000000000000000000000000000000
  686.         800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  687.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300033300000
  688.         00003777FF377777777707070330FFFFFFF077777F37F3FF3FF707370330F00F
  689.         00F077F77F37F773773707370330FFFFFFF077F77F37F3FFFF3707070330F000
  690.         0FF077777337F777733730003330FFFFFFF037773337F3FF3FF733033330F00F
  691.         0000337FFF37F773777733000330FFFF0FF033777FF7F3FF7F3733007030F08F
  692.         0F03337777F7F7737F7330703700FFFF003337773777FFFF7733307333700000
  693.         0333377FF37777777FFF33073070333000033377F777FF37777F333077000307
  694.         7770333777777F7777773333003300003300333377337777FF77333333333307
  695.         7770333333333377777733333333333000033333333333377773}
  696.       Layout = blGlyphTop
  697.       NumGlyphs = 2
  698.     end
  699.     object BitBtnReg: TBitBtn
  700.       Left = 384
  701.       Top = 8
  702.       Width = 57
  703.       Height = 41
  704.       Hint = 'Show Information on how to Register'
  705.       Caption = 'Register'
  706.       ParentShowHint = False
  707.       ShowHint = True
  708.       TabOrder = 4
  709.       OnClick = BitBtnRegClick
  710.       Glyph.Data = {
  711.         78010000424D7801000000000000760000002800000020000000100000000100
  712.         04000000000000000000120B0000120B00000000000000000000000000000000
  713.         800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  714.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333000000000
  715.         00333FF777777777773F0000FFFFFFFFFF0377773F3F3F3F3F7308880F0F0F0F
  716.         0FF07F33737373737337088880FFFFFFFFF07F3337FFFFFFFFF7088880000000
  717.         00037F3337777777777308888033330F03337F3337F3FF7F7FFF088880300000
  718.         00007F3337F7777777770FFFF030FFFFFFF07F3FF7F7F3FFFFF708008030F000
  719.         00F07F7737F7F77777F70FFFF030F0AAE0F07F3FF7F7F7F337F708008030F0DA
  720.         D0F07F7737F7F7FFF7F70FFFF030F00000F07F33F7F7F77777370FF9F030FFFF
  721.         FFF07F3737F7FFFFFFF70FFFF030000000007FFFF7F777777777000000333333
  722.         33337777773333333333333333333333333333333333333333330000}
  723.       Layout = blGlyphTop
  724.       NumGlyphs = 2
  725.     end
  726.     object BitBtn7: TBitBtn
  727.       Left = 240
  728.       Top = 8
  729.       Width = 57
  730.       Height = 41
  731.       Hint = 'Show Information on how to reduce Costs for Online Time'
  732.       Caption = 'Lower Cost'
  733.       ParentShowHint = False
  734.       ShowHint = True
  735.       TabOrder = 5
  736.       OnClick = BitBtn7Click
  737.       Glyph.Data = {
  738.         F8000000424DF800000000000000760000002800000010000000100000000100
  739.         04000000000000000000120B0000120B00000000000000000000000000000000
  740.         800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  741.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555500000
  742.         55555555000BB3B30555555030BB3303305555030BB0B3B3330555033BBBB333
  743.         330550B3B3BB3BB3B33050B3B33BBBBB333050B3B33BBBBB3B3050B3B333BB0B
  744.         33B050B33333BBB3B3B050BB33333333BB05550B33B3333BB305550BB33330BB
  745.         B0555550BB33B3BB0555555500B33330555555555500000555550000}
  746.       Layout = blGlyphTop
  747.     end
  748.     object BitBtnRegCode: TBitBtn
  749.       Left = 448
  750.       Top = 8
  751.       Width = 57
  752.       Height = 41
  753.       Hint = 'Enter Registration Code'
  754.       Caption = 'Enter Code'
  755.       ParentShowHint = False
  756.       ShowHint = True
  757.       TabOrder = 6
  758.       OnClick = EnterRegistrationCode1Click
  759.       Glyph.Data = {
  760.         78010000424D7801000000000000760000002800000020000000100000000100
  761.         04000000000000000000120B0000120B00000000000000000000000000000000
  762.         800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  763.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333000000000
  764.         00333FF777777777773F0000FFFFFFFFFF0377773F3F3F3F3F7308880F0F0F0F
  765.         0FF07F33737373737337088880FFFFFFFFF07F3337FFFFFFFFF7088880000000
  766.         00037F3337777777777308888033330F03337F3337F3FF7F7FFF088880300000
  767.         00007F3337F7777777770FFFF030FFFFFFF07F3FF7F7F3FFFFF708008030F000
  768.         00F07F7737F7F77777F70FFFF030F0AAE0F07F3FF7F7F7F337F708008030F0DA
  769.         D0F07F7737F7F7FFF7F70FFFF030F00000F07F33F7F7F77777370FF9F030FFFF
  770.         FFF07F3737F7FFFFFFF70FFFF030000000007FFFF7F777777777000000333333
  771.         33337777773333333333333333333333333333333333333333330000}
  772.       Layout = blGlyphTop
  773.       NumGlyphs = 2
  774.     end
  775.   end
  776.   object MainMenu1: TMainMenu
  777.     Left = 592
  778.     Top = 8
  779.     object File1: TMenuItem
  780.       Caption = '&File'
  781.       ShortCut = 0
  782.       object Print1: TMenuItem
  783.         Caption = '&Print...'
  784.         ShortCut = 0
  785.         OnClick = Print1Click
  786.       end
  787.       object PrintSetup1: TMenuItem
  788.         Caption = 'P&rint Setup...'
  789.         ShortCut = 0
  790.         OnClick = PrintSetup1Click
  791.       end
  792.       object N4: TMenuItem
  793.         Caption = '-'
  794.         ShortCut = 0
  795.       end
  796.       object BugReport1: TMenuItem
  797.         Caption = '&Bug Report...'
  798.         ShortCut = 0
  799.         OnClick = BugReport1Click
  800.       end
  801.       object SuggestionsforNextVersion1: TMenuItem
  802.         Caption = 'Suggestions for Next &Version'
  803.         ShortCut = 0
  804.         OnClick = SuggestionsforNextVersion1Click
  805.       end
  806.       object N1: TMenuItem
  807.         Caption = '-'
  808.         ShortCut = 0
  809.       end
  810.       object Exit1: TMenuItem
  811.         Caption = 'E&xit'
  812.         ShortCut = 0
  813.         OnClick = Exit1Click
  814.       end
  815.     end
  816.     object Help1: TMenuItem
  817.       Caption = '&Help'
  818.       ShortCut = 0
  819.       object Contents1: TMenuItem
  820.         Caption = '&Contents'
  821.         ShortCut = 0
  822.         OnClick = Contents1Click
  823.       end
  824.       object HowtoUseHelp1: TMenuItem
  825.         Caption = '&How to Use Help'
  826.         ShortCut = 0
  827.         OnClick = HowtoUseHelp1Click
  828.       end
  829.       object N2: TMenuItem
  830.         Tag = 1
  831.         Caption = '-'
  832.         ShortCut = 0
  833.       end
  834.       object HowtoRegister1: TMenuItem
  835.         Tag = 1
  836.         Caption = 'How to &Register'
  837.         ShortCut = 0
  838.         OnClick = HowtoRegister1Click
  839.       end
  840.       object EnterRegistrationCode1: TMenuItem
  841.         Tag = 1
  842.         Caption = '&Enter Registration Code...'
  843.         ShortCut = 0
  844.         OnClick = EnterRegistrationCode1Click
  845.       end
  846.       object N3: TMenuItem
  847.         Caption = '-'
  848.         ShortCut = 0
  849.       end
  850.       object About1: TMenuItem
  851.         Caption = '&About...'
  852.         ShortCut = 0
  853.         OnClick = About1Click
  854.       end
  855.     end
  856.     object TMenuItem
  857.       ShortCut = 0
  858.     end
  859.   end
  860.   object PrintDialog1: TPrintDialog
  861.     Left = 592
  862.     Top = 40
  863.   end
  864.   object PrinterSetupDialog1: TPrinterSetupDialog
  865.     Left = 544
  866.     Top = 40
  867.   end
  868.   object Timer1: TTimer
  869.     OnTimer = Timer1Timer
  870.     Left = 544
  871.   end
  872.   object Timer2: TTimer
  873.     Interval = 60000
  874.     OnTimer = Timer2Timer
  875.     Left = 520
  876.     Top = 40
  877.   end
  878.   object Timer3: TTimer
  879.     Interval = 10000
  880.     OnTimer = Timer3Timer
  881.     Left = 496
  882.     Top = 48
  883.   end
  884.   object Timer4: TTimer
  885.     Interval = 3000
  886.     OnTimer = Timer4Timer
  887.     Left = 464
  888.     Top = 56
  889.   end
  890. end
  891.