home *** CD-ROM | disk | FTP | other *** search
/ Chip Hitware 6 B / CHIP_HITWARE6_B.iso / bonus / EverythingIOwn / EIOWN_17.EXE / EIO.EXE / 0 / RCDATA / TFRMMAIN / TFRMMAIN.txt < prev   
Encoding:
Text File  |  1998-02-24  |  21.6 KB  |  693 lines
  1. object frmMain: TfrmMain
  2.   Left = 132
  3.   Top = 106
  4.   ActiveControl = btnAddRecord
  5.   AutoScroll = False
  6.   Caption = 'Everything I Own! -- Version 1.7b'
  7.   ClientHeight = 404
  8.   ClientWidth = 622
  9.   Font.Color = clBlack
  10.   Font.Height = -10
  11.   Font.Name = 'MS Sans Serif'
  12.   Font.Style = []
  13.   Icon.Data = {<image000.ico>}
  14.   Menu = MainMenu1
  15.   Position = poScreenCenter
  16.   OnActivate = FormActivate
  17.   OnClose = FormClose
  18.   OnCreate = FormCreate
  19.   OnShow = FormShow
  20.   PixelsPerInch = 96
  21.   TextHeight = 13
  22.   object Panel1: TPanel
  23.     Left = 8
  24.     Top = 336
  25.     Width = 601
  26.     Height = 65
  27.     BevelOuter = bvLowered
  28.     BevelWidth = 2
  29.     BorderStyle = bsSingle
  30.     TabOrder = 0
  31.     object btnClose: TBitBtn
  32.       Left = 544
  33.       Top = 10
  34.       Width = 41
  35.       Height = 39
  36.       Caption = 'E&xit'
  37.       Font.Color = clBlue
  38.       Font.Height = -12
  39.       Font.Name = 'MS Sans Serif'
  40.       Font.Style = []
  41.       ParentFont = False
  42.       TabOrder = 8
  43.       OnClick = btnCloseClick
  44.       Glyph.Data = {
  45.         78010000424D7801000000000000760000002800000020000000100000000100
  46.         04000000000000000000120B0000120B00000000000000000000000000000000
  47.         800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  48.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00330000000000
  49.         03333377777777777F333301111111110333337F333333337F33330111111111
  50.         0333337F333333337F333301111111110333337F333333337F33330111111111
  51.         0333337F333333337F333301111111110333337F333333337F33330111111111
  52.         0333337F3333333F7F333301111111B10333337F333333737F33330111111111
  53.         0333337F333333337F333301111111110333337F33FFFFF37F3333011EEEEE11
  54.         0333337F377777F37F3333011EEEEE110333337F37FFF7F37F3333011EEEEE11
  55.         0333337F377777337F333301111111110333337F333333337F33330111111111
  56.         0333337FFFFFFFFF7F33330000000000033333777777777773330000}
  57.       Layout = blGlyphTop
  58.       NumGlyphs = 2
  59.     end
  60.     object btnTop: TBitBtn
  61.       Left = 311
  62.       Top = 9
  63.       Width = 52
  64.       Height = 39
  65.       Caption = '&First'
  66.       Enabled = False
  67.       Font.Color = clBlue
  68.       Font.Height = -12
  69.       Font.Name = 'MS Sans Serif'
  70.       Font.Style = []
  71.       ParentFont = False
  72.       TabOrder = 4
  73.       OnClick = btnTopClick
  74.       Glyph.Data = {
  75.         78010000424D7801000000000000760000002800000020000000100000000100
  76.         04000000000000000000120B0000120B00000000000000000000000000000000
  77.         800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  78.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000333
  79.         3333333333777F33333333333309033333333333337F7F333333333333090333
  80.         33333333337F7F33333333333309033333333333337F7F333333333333090333
  81.         33333333337F7F33333333333309033333333333FF7F7FFFF333333000090000
  82.         3333333777737777F333333099999990333333373F3333373333333309999903
  83.         333333337F33337F33333333099999033333333373F333733333333330999033
  84.         3333333337F337F3333333333099903333333333373F37333333333333090333
  85.         33333333337F7F33333333333309033333333333337373333333333333303333
  86.         333333333337F3333333333333303333333333333337333333330000}
  87.       Layout = blGlyphTop
  88.       NumGlyphs = 2
  89.     end
  90.     object btnLast: TBitBtn
  91.       Left = 479
  92.       Top = 9
  93.       Width = 52
  94.       Height = 39
  95.       Caption = '&Last'
  96.       Font.Color = clBlue
  97.       Font.Height = -12
  98.       Font.Name = 'MS Sans Serif'
  99.       Font.Style = []
  100.       ParentFont = False
  101.       TabOrder = 7
  102.       OnClick = btnLastClick
  103.       Glyph.Data = {
  104.         78010000424D7801000000000000760000002800000020000000100000000100
  105.         04000000000000000000120B0000120B00000000000000000000000000000000
  106.         800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  107.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333303333
  108.         333333333337F33333333333333033333333333333373F333333333333090333
  109.         33333333337F7F33333333333309033333333333337373F33333333330999033
  110.         3333333337F337F33333333330999033333333333733373F3333333309999903
  111.         333333337F33337F33333333099999033333333373333373F333333099999990
  112.         33333337FFFF3FF7F33333300009000033333337777F77773333333333090333
  113.         33333333337F7F33333333333309033333333333337F7F333333333333090333
  114.         33333333337F7F33333333333309033333333333337F7F333333333333090333
  115.         33333333337F7F333333333333000333333333333377733333330000}
  116.       Layout = blGlyphTop
  117.       NumGlyphs = 2
  118.     end
  119.     object btnPrior: TBitBtn
  120.       Left = 367
  121.       Top = 9
  122.       Width = 52
  123.       Height = 39
  124.       Caption = '&Prior'
  125.       Enabled = False
  126.       Font.Color = clBlue
  127.       Font.Height = -12
  128.       Font.Name = 'MS Sans Serif'
  129.       Font.Style = []
  130.       ParentFont = False
  131.       TabOrder = 5
  132.       OnClick = btnPriorClick
  133.       Glyph.Data = {
  134.         78010000424D7801000000000000760000002800000020000000100000000100
  135.         04000000000000000000120B0000120B00000000000000000000000000000000
  136.         800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  137.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
  138.         3333333333333333333333333333333333333333333333333333333333333333
  139.         3333333333333FF3333333333333003333333333333F77F33333333333009033
  140.         333333333F7737F333333333009990333333333F773337FFFFFF330099999000
  141.         00003F773333377777770099999999999990773FF33333FFFFF7330099999000
  142.         000033773FF33777777733330099903333333333773FF7F33333333333009033
  143.         33333333337737F3333333333333003333333333333377333333333333333333
  144.         3333333333333333333333333333333333333333333333333333333333333333
  145.         33333333333333333333333333333333333333333333333333330000}
  146.       Layout = blGlyphTop
  147.       NumGlyphs = 2
  148.     end
  149.     object btnNext: TBitBtn
  150.       Left = 423
  151.       Top = 9
  152.       Width = 52
  153.       Height = 39
  154.       Caption = '&Next'
  155.       Font.Color = clBlue
  156.       Font.Height = -12
  157.       Font.Name = 'MS Sans Serif'
  158.       Font.Style = []
  159.       ParentFont = False
  160.       TabOrder = 6
  161.       OnClick = btnNextClick
  162.       Glyph.Data = {
  163.         78010000424D7801000000000000760000002800000020000000100000000100
  164.         04000000000000000000120B0000120B00000000000000000000000000000000
  165.         800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  166.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
  167.         3333333333333333333333333333333333333333333333333333333333333333
  168.         3333333333333333333333333333333333333333333FF3333333333333003333
  169.         3333333333773FF3333333333309003333333333337F773FF333333333099900
  170.         33333FFFFF7F33773FF30000000999990033777777733333773F099999999999
  171.         99007FFFFFFF33333F7700000009999900337777777F333F7733333333099900
  172.         33333333337F3F77333333333309003333333333337F77333333333333003333
  173.         3333333333773333333333333333333333333333333333333333333333333333
  174.         33333333333333333333333333333333333333333333333333330000}
  175.       Layout = blGlyphTop
  176.       NumGlyphs = 2
  177.     end
  178.     object btnDeleteRecord: TBitBtn
  179.       Left = 152
  180.       Top = 8
  181.       Width = 65
  182.       Height = 39
  183.       Caption = '&Delete Item'
  184.       Font.Color = clBlue
  185.       Font.Height = -12
  186.       Font.Name = 'MS Sans Serif'
  187.       Font.Style = []
  188.       ParentFont = False
  189.       TabOrder = 3
  190.       OnClick = btnDeleteRecordClick
  191.       Glyph.Data = {
  192.         78010000424D7801000000000000760000002800000020000000100000000100
  193.         04000000000000000000120B0000120B00000000000000000000000000000000
  194.         800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  195.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
  196.         55555FFFFFFF5F55FFF5777777757559995777777775755777F7555555555550
  197.         305555555555FF57F7F555555550055BB0555555555775F777F55555550FB000
  198.         005555555575577777F5555550FB0BF0F05555555755755757F555550FBFBF0F
  199.         B05555557F55557557F555550BFBF0FB005555557F55575577F555500FBFBFB0
  200.         B05555577F555557F7F5550E0BFBFB00B055557575F55577F7F550EEE0BFB0B0
  201.         B05557FF575F5757F7F5000EEE0BFBF0B055777FF575FFF7F7F50000EEE00000
  202.         B0557777FF577777F7F500000E055550805577777F7555575755500000555555
  203.         05555777775555557F55550005555555055555777555555575550000}
  204.       Layout = blGlyphTop
  205.       NumGlyphs = 2
  206.     end
  207.     object btnAddRecord: TBitBtn
  208.       Left = 8
  209.       Top = 8
  210.       Width = 68
  211.       Height = 39
  212.       Caption = '&Add Item'
  213.       Font.Color = clBlue
  214.       Font.Height = -12
  215.       Font.Name = 'MS Sans Serif'
  216.       Font.Style = []
  217.       ParentFont = False
  218.       TabOrder = 0
  219.       OnClick = btnAddRecordClick
  220.       Glyph.Data = {
  221.         78010000424D7801000000000000760000002800000020000000100000000100
  222.         04000000000000000000120B0000120B00000000000000000000000000000000
  223.         800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  224.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
  225.         555555FFFFFFFFFF5F5557777777777505555777777777757F55555555555555
  226.         055555555555FF5575F555555550055030555555555775F7F7F55555550FB000
  227.         005555555575577777F5555550FB0BF0F05555555755755757F555550FBFBF0F
  228.         B05555557F55557557F555550BFBF0FB005555557F55575577F555500FBFBFB0
  229.         305555577F555557F7F5550E0BFBFB003055557575F55577F7F550EEE0BFB0B0
  230.         305557FF575F5757F7F5000EEE0BFBF03055777FF575FFF7F7F50000EEE00000
  231.         30557777FF577777F7F500000E05555BB05577777F75555777F5500000555550
  232.         3055577777555557F7F5550005555559995555777555555777550000}
  233.       Layout = blGlyphTop
  234.       NumGlyphs = 2
  235.     end
  236.     object btnEditRecord: TBitBtn
  237.       Left = 80
  238.       Top = 8
  239.       Width = 68
  240.       Height = 39
  241.       Caption = '&Edit Item'
  242.       Font.Color = clBlue
  243.       Font.Height = -12
  244.       Font.Name = 'MS Sans Serif'
  245.       Font.Style = []
  246.       ParentFont = False
  247.       TabOrder = 1
  248.       OnClick = btnEditRecordClick
  249.       Glyph.Data = {
  250.         78010000424D7801000000000000760000002800000020000000100000000100
  251.         04000000000000000000120B0000120B00000000000000000000000000000000
  252.         800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  253.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000000
  254.         000033333377777777773333330FFFFFFFF03FF3FF7FF33F3FF700300000FF0F
  255.         00F077F777773F737737E00BFBFB0FFFFFF07773333F7F3333F7E0BFBF000FFF
  256.         F0F077F3337773F3F737E0FBFBFBF0F00FF077F3333FF7F77F37E0BFBF00000B
  257.         0FF077F3337777737337E0FBFBFBFBF0FFF077F33FFFFFF73337E0BF0000000F
  258.         FFF077FF777777733FF7000BFB00B0FF00F07773FF77373377373330000B0FFF
  259.         FFF03337777373333FF7333330B0FFFF00003333373733FF777733330B0FF00F
  260.         0FF03333737F37737F373330B00FFFFF0F033337F77F33337F733309030FFFFF
  261.         00333377737FFFFF7733333033000000033333373377777773330000}
  262.       Layout = blGlyphTop
  263.       NumGlyphs = 2
  264.     end
  265.     object btnView: TBitBtn
  266.       Left = 224
  267.       Top = 8
  268.       Width = 65
  269.       Height = 39
  270.       Caption = '&View Item'
  271.       Font.Color = clBlue
  272.       Font.Height = -12
  273.       Font.Name = 'MS Sans Serif'
  274.       Font.Style = []
  275.       ParentFont = False
  276.       TabOrder = 2
  277.       OnClick = btnViewClick
  278.       Glyph.Data = {
  279.         78010000424D7801000000000000760000002800000020000000100000000100
  280.         04000000000000000000120B0000120B00000000000000000000000000000000
  281.         800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  282.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
  283.         55555555FFFFFFFF5555555000000005555555577777777FF555550999999900
  284.         55555575555555775F55509999999901055557F55555557F75F5001111111101
  285.         105577FFFFFFFF7FF75F00000000000011057777777777775F755070FFFFFF0F
  286.         01105777F555557F7FF75500FFFFFF0F00105577F555FF7F77575550FF70000F
  287.         0F0055575FF777757F775555000FFFFF0F005555777555FF7F77555550FF7000
  288.         0F055555575FF777757F555555000FFFFF05555555777555FF7F55555550FF70
  289.         0005555555575FF7777555555555000555555555555577755555555555555555
  290.         55555555555555555555555555555555555555555555555555550000}
  291.       Layout = blGlyphTop
  292.       NumGlyphs = 2
  293.     end
  294.   end
  295.   object pnlGrid: TPanel
  296.     Left = 8
  297.     Top = 8
  298.     Width = 601
  299.     Height = 297
  300.     BevelInner = bvLowered
  301.     BevelWidth = 2
  302.     BorderStyle = bsSingle
  303.     TabOrder = 1
  304.     object grdItems: TDBGrid
  305.       Left = 4
  306.       Top = 4
  307.       Width = 589
  308.       Height = 285
  309.       TabStop = False
  310.       Align = alClient
  311.       Columns = <
  312.         item
  313.           FieldName = 'NAME'
  314.           Title.Alignment = taCenter
  315.           Title.Caption = 'Name of Item'
  316.           Title.Font.Color = clBlue
  317.           Title.Font.Height = -11
  318.           Title.Font.Name = 'MS Sans Serif'
  319.           Title.Font.Style = []
  320.           Width = 100
  321.         end
  322.         item
  323.           FieldName = 'DESCRIPT'
  324.           Title.Alignment = taCenter
  325.           Title.Caption = 'Description'
  326.           Title.Font.Color = clBlue
  327.           Title.Font.Height = -11
  328.           Title.Font.Name = 'MS Sans Serif'
  329.           Title.Font.Style = []
  330.           Width = 114
  331.         end
  332.         item
  333.           FieldName = 'BRANDNAME'
  334.           Title.Alignment = taCenter
  335.           Title.Caption = 'Brand Name'
  336.           Title.Font.Color = clBlue
  337.           Title.Font.Height = -11
  338.           Title.Font.Name = 'MS Sans Serif'
  339.           Title.Font.Style = []
  340.           Width = 107
  341.         end
  342.         item
  343.           FieldName = 'DATEPUR'
  344.           Title.Alignment = taCenter
  345.           Title.Caption = 'Date Purchased'
  346.           Title.Font.Color = clBlue
  347.           Title.Font.Height = -11
  348.           Title.Font.Name = 'MS Sans Serif'
  349.           Title.Font.Style = []
  350.         end
  351.         item
  352.           FieldName = 'TYPE'
  353.           Title.Alignment = taCenter
  354.           Title.Caption = 'Type of Item'
  355.           Title.Font.Color = clBlue
  356.           Title.Font.Height = -11
  357.           Title.Font.Name = 'MS Sans Serif'
  358.           Title.Font.Style = []
  359.           Width = 92
  360.         end
  361.         item
  362.           FieldName = 'LOCATION'
  363.           Title.Alignment = taCenter
  364.           Title.Caption = 'Location'
  365.           Title.Font.Color = clBlue
  366.           Title.Font.Height = -11
  367.           Title.Font.Name = 'MS Sans Serif'
  368.           Title.Font.Style = []
  369.           Width = 97
  370.         end>
  371.       DataSource = DataModule1.OwnSource
  372.       Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit]
  373.       TabOrder = 0
  374.       TitleFont.Color = clBlack
  375.       TitleFont.Height = -10
  376.       TitleFont.Name = 'MS Sans Serif'
  377.       TitleFont.Style = []
  378.       OnDblClick = grdItemsDblClick
  379.       OnEnter = grdItemsEnter
  380.     end
  381.   end
  382.   object btnBrand: TBitBtn
  383.     Left = 8
  384.     Top = 304
  385.     Width = 105
  386.     Height = 33
  387.     Caption = '&Brand Names'
  388.     Font.Color = clBlue
  389.     Font.Height = -12
  390.     Font.Name = 'MS Sans Serif'
  391.     Font.Style = []
  392.     ParentFont = False
  393.     TabOrder = 2
  394.     TabStop = False
  395.     OnClick = btnBrandClick
  396.   end
  397.   object btnTypes: TBitBtn
  398.     Left = 112
  399.     Top = 304
  400.     Width = 105
  401.     Height = 33
  402.     Caption = '&Types of Items'
  403.     Font.Color = clBlue
  404.     Font.Height = -12
  405.     Font.Name = 'MS Sans Serif'
  406.     Font.Style = []
  407.     ParentFont = False
  408.     TabOrder = 3
  409.     TabStop = False
  410.     OnClick = btnTypesClick
  411.   end
  412.   object btnLocation: TBitBtn
  413.     Left = 216
  414.     Top = 304
  415.     Width = 105
  416.     Height = 33
  417.     Caption = 'L&ocations'
  418.     Font.Color = clBlue
  419.     Font.Height = -12
  420.     Font.Name = 'MS Sans Serif'
  421.     Font.Style = []
  422.     ParentFont = False
  423.     TabOrder = 4
  424.     TabStop = False
  425.     OnClick = btnLocationClick
  426.   end
  427.   object btnPurchasedFrom: TBitBtn
  428.     Left = 320
  429.     Top = 304
  430.     Width = 105
  431.     Height = 33
  432.     Caption = 'P&urchased From'
  433.     Font.Color = clBlue
  434.     Font.Height = -12
  435.     Font.Name = 'MS Sans Serif'
  436.     Font.Style = []
  437.     ParentFont = False
  438.     TabOrder = 5
  439.     TabStop = False
  440.     OnClick = btnPurchasedFromClick
  441.   end
  442.   object MainMenu1: TMainMenu
  443.     Left = 576
  444.     Top = 65528
  445.     object Files1: TMenuItem
  446.       Caption = '&Files'
  447.       ShortCut = 0
  448.       object BrandNames1: TMenuItem
  449.         Caption = '&Brand Names'
  450.         ShortCut = 0
  451.         OnClick = BrandNames1Click
  452.       end
  453.       object TypesofItems1: TMenuItem
  454.         Caption = '&Types of Items'
  455.         ShortCut = 0
  456.         OnClick = TypesofItems1Click
  457.       end
  458.       object Locations1: TMenuItem
  459.         Caption = 'L&ocations'
  460.         ShortCut = 0
  461.         OnClick = Locations1Click
  462.       end
  463.       object PurchasedFrom1: TMenuItem
  464.         Caption = 'P&urchased From'
  465.         ShortCut = 0
  466.         OnClick = PurchasedFrom1Click
  467.       end
  468.       object N2: TMenuItem
  469.         Caption = '-'
  470.         ShortCut = 0
  471.       end
  472.       object Print2: TMenuItem
  473.         Caption = '&Print'
  474.         ShortCut = 0
  475.         object PrintReports1: TMenuItem
  476.           Caption = '&Print/View Reports'
  477.           ShortCut = 0
  478.           OnClick = PrintReports1Click
  479.         end
  480.         object PrintViewThisrecord2: TMenuItem
  481.           Caption = 'Print/View &This Record'
  482.           ShortCut = 0
  483.           OnClick = PrintViewThisrecord2Click
  484.         end
  485.       end
  486.       object N3: TMenuItem
  487.         Caption = '-'
  488.         ShortCut = 0
  489.       end
  490.       object CheckWarranties1: TMenuItem
  491.         Caption = '&Check Warranties'
  492.         ShortCut = 0
  493.         OnClick = CheckWarranties1Click
  494.       end
  495.       object BackupRestore1: TMenuItem
  496.         Caption = 'Backup/&Restore'
  497.         ShortCut = 0
  498.         OnClick = BackupRestore1Click
  499.       end
  500.       object N4: TMenuItem
  501.         Caption = '-'
  502.         ShortCut = 0
  503.       end
  504.       object Exti1: TMenuItem
  505.         Caption = 'E&xit'
  506.         ShortCut = 0
  507.         OnClick = Exti1Click
  508.       end
  509.     end
  510.     object Records1: TMenuItem
  511.       Caption = '&Records'
  512.       ShortCut = 0
  513.       object AddRecords1: TMenuItem
  514.         Caption = '&View Details'
  515.         ShortCut = 0
  516.         OnClick = AddRecords1Click
  517.       end
  518.       object N7: TMenuItem
  519.         Caption = '-'
  520.         ShortCut = 0
  521.       end
  522.       object AddItem1: TMenuItem
  523.         Caption = '&Add Item'
  524.         ShortCut = 0
  525.         OnClick = AddItem1Click
  526.       end
  527.       object EditItem1: TMenuItem
  528.         Caption = '&Edit Item'
  529.         ShortCut = 0
  530.         OnClick = EditItem1Click
  531.       end
  532.       object DeleteItem1: TMenuItem
  533.         Caption = '&Delete Item'
  534.         ShortCut = 0
  535.         OnClick = DeleteItem1Click
  536.       end
  537.     end
  538.     object Navigate1: TMenuItem
  539.       Caption = '&Navigate'
  540.       ShortCut = 0
  541.       object GoTop1: TMenuItem
  542.         Caption = 'Go &First'
  543.         ShortCut = 0
  544.         OnClick = GoTop1Click
  545.       end
  546.       object GoNext1: TMenuItem
  547.         Caption = 'Go &Next'
  548.         ShortCut = 0
  549.         OnClick = GoNext1Click
  550.       end
  551.       object GoPrior1: TMenuItem
  552.         Caption = 'Go &Prior'
  553.         ShortCut = 0
  554.         OnClick = GoPrior1Click
  555.       end
  556.       object GoLast1: TMenuItem
  557.         Caption = 'Go &Last'
  558.         ShortCut = 0
  559.         OnClick = GoLast1Click
  560.       end
  561.     end
  562.     object Sort1: TMenuItem
  563.       Caption = '&Sort'
  564.       ShortCut = 0
  565.       object ByItemType1: TMenuItem
  566.         Caption = 'By &Name of Item'
  567.         Checked = True
  568.         ShortCut = 0
  569.         OnClick = ByItemType1Click
  570.       end
  571.       object ByDatePurchased1: TMenuItem
  572.         Caption = 'By Date &Purchased'
  573.         ShortCut = 0
  574.         OnClick = ByDatePurchased1Click
  575.       end
  576.       object ByDescription1: TMenuItem
  577.         Caption = 'By &Description'
  578.         ShortCut = 0
  579.         OnClick = ByDescription1Click
  580.       end
  581.       object ByLocation1: TMenuItem
  582.         Caption = 'By &Location'
  583.         ShortCut = 0
  584.         OnClick = ByLocation1Click
  585.       end
  586.       object ByTypeofItem1: TMenuItem
  587.         Caption = 'By &Type of Item'
  588.         ShortCut = 0
  589.         OnClick = ByTypeofItem1Click
  590.       end
  591.     end
  592.     object Search1: TMenuItem
  593.       Caption = 'Sear&ch'
  594.       ShortCut = 0
  595.       OnClick = Search1Click
  596.     end
  597.     object Filter1: TMenuItem
  598.       Caption = 'F&ilter'
  599.       ShortCut = 0
  600.       object ShowAllRecords1: TMenuItem
  601.         Caption = '&Show All Records'
  602.         Checked = True
  603.         ShortCut = 0
  604.         OnClick = ShowAllRecords1Click
  605.       end
  606.       object N1: TMenuItem
  607.         Caption = '-'
  608.         ShortCut = 0
  609.       end
  610.       object OnName1: TMenuItem
  611.         Caption = 'On &Name of Item'
  612.         ShortCut = 0
  613.         OnClick = OnName1Click
  614.       end
  615.       object OnDescription1: TMenuItem
  616.         Caption = 'On &Description'
  617.         ShortCut = 0
  618.         OnClick = OnDescription1Click
  619.       end
  620.       object OnLocation1: TMenuItem
  621.         Caption = 'On &Location of Item'
  622.         ShortCut = 0
  623.         OnClick = OnLocation1Click
  624.       end
  625.       object OnType1: TMenuItem
  626.         Caption = 'On &Type of Item'
  627.         ShortCut = 0
  628.         OnClick = OnType1Click
  629.       end
  630.     end
  631.     object Help1: TMenuItem
  632.       Caption = '&Help'
  633.       ShortCut = 0
  634.       object HelpFiles1: TMenuItem
  635.         Caption = '&Help'
  636.         ShortCut = 112
  637.         OnClick = HelpFiles1Click
  638.       end
  639.       object HelponHelp1: TMenuItem
  640.         Caption = 'How To &Use Help'
  641.         ShortCut = 0
  642.         OnClick = HelponHelp1Click
  643.       end
  644.       object QuickStartHelp1: TMenuItem
  645.         Caption = '&Quick Start Help'
  646.         ShortCut = 0
  647.         OnClick = QuickStartHelp1Click
  648.       end
  649.       object N6: TMenuItem
  650.         Caption = '-'
  651.         ShortCut = 0
  652.       end
  653.       object LicensingInformation1: TMenuItem
  654.         Caption = '&Ordering  Information'
  655.         ShortCut = 0
  656.         OnClick = LicensingInformation1Click
  657.       end
  658.       object ViewPrintLicensingForm1: TMenuItem
  659.         Caption = '&View/Print Order Form'
  660.         ShortCut = 0
  661.         object USAandOtherCountries1: TMenuItem
  662.           Caption = 'USA and Other Countries'
  663.           ShortCut = 0
  664.           OnClick = USAandOtherCountries1Click
  665.         end
  666.         object UnitedKingdom1: TMenuItem
  667.           Caption = 'United Kingdom'
  668.           ShortCut = 0
  669.           OnClick = UnitedKingdom1Click
  670.         end
  671.         object Australia1: TMenuItem
  672.           Caption = 'Australia'
  673.           ShortCut = 0
  674.           OnClick = Australia1Click
  675.         end
  676.       end
  677.       object N5: TMenuItem
  678.         Caption = '-'
  679.         ShortCut = 0
  680.       end
  681.       object About1: TMenuItem
  682.         Caption = '&About'
  683.         ShortCut = 0
  684.         OnClick = About1Click
  685.       end
  686.     end
  687.   end
  688.   object Timer1: TTimer
  689.     Left = 545
  690.     Top = 65532
  691.   end
  692. end
  693.