main.dfm

这是一个三层的进销存系统

      object N49: TMenuItem
        Action = f07
      end
      object N50: TMenuItem
        Action = f08
      end
      object N90: TMenuItem
        Action = f0701
      end
      object N51: TMenuItem
        Action = f09
      end
      object N52: TMenuItem
        Caption = '-'
      end
      object N53: TMenuItem
        Action = f10
      end
    end
    object POSP1: TMenuItem
      Caption = '[POS'#31649#29702'&P]'
      Hint = 'POS'#31649#29702
      object POS1: TMenuItem
        Action = g01
      end
      object POS2: TMenuItem
        Action = g02
      end
      object N54: TMenuItem
        Caption = '-'
      end
      object POS3: TMenuItem
        Action = g03
      end
      object POS4: TMenuItem
        Action = g04
      end
    end
    object E1: TMenuItem
      Caption = '['#21592#24037#20449#24687'&E]'
      object N67: TMenuItem
        Action = i01
      end
      object N83: TMenuItem
        Caption = '-'
      end
      object N84: TMenuItem
        Action = i02
      end
      object N85: TMenuItem
        Caption = '-'
      end
      object N86: TMenuItem
        Action = i03
      end
      object N87: TMenuItem
        Caption = '-'
      end
      object N88: TMenuItem
        Action = i04
      end
    end
    object N5: TMenuItem
      Caption = '['#31995#32479#20449#24687'&A]'
      Hint = #31995#32479#20449#24687
      object POS5: TMenuItem
        Action = h01
      end
      object N55: TMenuItem
        Action = h02
      end
      object N57: TMenuItem
        Caption = '-'
      end
      object N58: TMenuItem
        Action = h03
      end
      object N60: TMenuItem
        Action = h04
      end
      object N65: TMenuItem
        Action = h09
      end
      object N61: TMenuItem
        Caption = '-'
      end
      object N89: TMenuItem
        Action = h10
      end
      object N62: TMenuItem
        Action = h05
      end
      object N66: TMenuItem
        Action = h07
      end
      object N63: TMenuItem
        Caption = '-'
      end
      object N64: TMenuItem
        Action = h06
      end
      object N69: TMenuItem
        Action = h08
      end
      object N68: TMenuItem
        Caption = '-'
      end
      object h10031: TMenuItem
        Action = h1003
      end
    end
  end
  object ActionList1: TActionList
    Images = nonimagelist
    Left = 120
    Top = 52
    object WindowCascade1: TWindowCascade
      Category = 'Toolbar'
      Caption = '&Cascade'
      Enabled = False
      Hint = 'Cascade'
      ImageIndex = 1
    end
    object WindowTileHorizontal1: TWindowTileHorizontal
      Category = 'Toolbar'
      Caption = 'Tile &Horizontally'
      Enabled = False
      Hint = 'Tile Horizontal'
      ImageIndex = 2
    end
    object WindowTileVertical1: TWindowTileVertical
      Category = 'Toolbar'
      Caption = '&Tile Vertically'
      Enabled = False
      Hint = 'Tile Vertical'
      ImageIndex = 3
    end
    object h1001: TAction
      Category = 'Toolbar'
      ImageIndex = 4
      OnExecute = h1001Execute
    end
    object h1002: TAction
      Category = 'Toolbar'
      ImageIndex = 5
      OnExecute = h1002Execute
    end
    object a01: TAction
      Category = 'wareinfo'
      Caption = #37319#36141#31649#29702
      Hint = #37319#36141#31649#29702
      OnExecute = a01Execute
    end
    object a02: TAction
      Category = 'wareinfo'
      Caption = #37319#36141#36827#20179
      Hint = #37319#36141#36827#20179
      OnExecute = a02Execute
    end
    object a03: TAction
      Category = 'wareinfo'
      Caption = #37319#36141#36864#36135
      Hint = #37319#36141#36864#36135
      OnExecute = a03Execute
    end
    object a04: TAction
      Category = 'wareinfo'
      Caption = #37319#36141#20184#27454
      Hint = #37319#36141#20184#27454
      OnExecute = a04Execute
    end
    object a05: TAction
      Category = 'wareinfo'
      Caption = #36135#21697#39046#29992
      Hint = #36135#21697#39046#29992
      OnExecute = a05Execute
    end
    object b01: TAction
      Category = 'serverreport'
      Caption = #21592#24037#25552#25104
      Hint = #21592#24037#25552#25104
    end
    object b02: TAction
      Category = 'serverreport'
      Caption = #25104#21697#38144#21806
      Hint = #25104#21697#38144#21806
    end
    object b03: TAction
      Category = 'serverreport'
      Caption = #26381#21153#39033#30446
      Hint = #26381#21153#39033#30446
    end
    object b04: TAction
      Category = 'serverreport'
      Caption = #20250#21592#28040#36153
      Hint = #20250#21592#28040#36153
    end
    object c01: TAction
      Category = 'vipinfo'
      Caption = #20250#21592#21345#35774#32622' '
      Hint = #20250#21592#21345#35774#32622' '
      OnExecute = c01Execute
    end
    object c02: TAction
      Category = 'vipinfo'
      Caption = #20250#21592#20805#20540
      Hint = #20250#21592#20805#20540
      OnExecute = c02Execute
    end
    object c03: TAction
      Category = 'vipinfo'
      Caption = #20250#21592#29616#37329#22870#21382
      Hint = #20250#21592#29616#37329#22870#21382
    end
    object c04: TAction
      Category = 'vipinfo'
      Caption = #20250#21592#25346#22833#34917#21345
      Hint = #20250#21592#25346#22833#34917#21345
    end
    object c05: TAction
      Category = 'vipinfo'
      Caption = #21457#34892#20250#21592#21345
      Hint = #21457#34892#20250#21592#21345
    end
    object d01: TAction
      Category = 'baseinfo'
      Caption = #37096#38376#36164#26009
      Hint = #37096#38376#36164#26009
      OnExecute = d01Execute
    end
    object d02: TAction
      Category = 'baseinfo'
      Caption = #26381#21153#39033#30446#35774#32622
      Hint = #26381#21153#39033#30446#35774#32622
      OnExecute = d02Execute
    end
    object d03: TAction
      Category = 'baseinfo'
      Caption = #20135#21697#36164#26009
      Hint = #20135#21697#36164#26009
      OnExecute = d03Execute
    end
    object d04: TAction
      Category = 'baseinfo'
      Caption = #25252#29702#35774#32622
      Hint = #25252#29702#35774#32622
      OnExecute = d04Execute
    end
    object d05: TAction
      Category = 'baseinfo'
      Caption = #30103#31243#39033#30446#35774#32622
      Hint = #30103#31243#39033#30446#35774#32622
      OnExecute = d05Execute
    end
    object d06: TAction
      Category = 'baseinfo'
      Caption = #24037#31181#35774#32622
      Hint = #24037#31181#35774#32622
      OnExecute = d06Execute
    end
    object e01: TAction
      Category = 'baseinfo'
      Caption = #21592#24037#32771#21220
      Hint = #21592#24037#32771#21220
    end
    object e02: TAction
      Category = 'baseinfo'
      Caption = #21592#24037#24037#36164
      Hint = #21592#24037#24037#36164
    end
    object f01: TAction
      Category = 'reportsearch'
      Caption = #26597#25214#25252#29702
      Hint = #26597#25214#25252#29702
    end
    object f02: TAction
      Category = 'reportsearch'
      Caption = #26597#25214#30103#31243
      Hint = #26597#25214#30103#31243
    end
    object f03: TAction
      Category = 'reportsearch'
      Caption = #32463#33829#21333#25454
      Hint = #32463#33829#21333#25454
    end
    object f04: TAction
      Category = 'reportsearch'