main.dfm

delphi框架可以学习, 写的很好的

        end
        object N8: TMenuItem
          Action = actBase_Report
        end
      end
      object N4: TMenuItem
        Caption = '-'
      end
      object N5: TMenuItem
        Caption = #24120#29992#36164#26009
        object N36: TMenuItem
          Caption = #20844#21496#36164#26009
        end
        object N38: TMenuItem
          Caption = #37096#38376#21517#31216
        end
        object N23: TMenuItem
          Caption = #21487#29992#36710#36742
        end
        object N35: TMenuItem
          Caption = '-'
        end
        object N21: TMenuItem
          Caption = #22320#21306#31649#29702
        end
      end
      object N82: TMenuItem
        Caption = '-'
      end
      object N20: TMenuItem
        Caption = #38144#21806#37319#36141#30456#20851
        object N22: TMenuItem
          Caption = #23458#25143#36164#26009
        end
        object N42: TMenuItem
          Caption = '-'
        end
        object N80: TMenuItem
          Action = actBase_Stocker
        end
        object N76: TMenuItem
          Action = actBase_HCLPrice
        end
      end
      object N83: TMenuItem
        Caption = '-'
      end
      object N79: TMenuItem
        Caption = #29983#20135#30456#20851
        object N81: TMenuItem
          Action = actBase_YLDM
        end
        object N27: TMenuItem
          Caption = '-'
        end
        object N67: TMenuItem
          Action = actBase_FKFW
        end
        object N68: TMenuItem
          Action = actBase_YLLX
        end
        object N69: TMenuItem
          Action = actBase_YSMC
        end
        object N70: TMenuItem
          Action = actBase_CPZZ
        end
        object N75: TMenuItem
          Action = actBase_YLSYFW
        end
      end
      object N84: TMenuItem
        Caption = '-'
      end
      object N28: TMenuItem
        Caption = #24211#23384#30456#20851
        object N29: TMenuItem
          Caption = #20179#24211#31867#22411
        end
        object N30: TMenuItem
          Caption = #20179#24211#20195#30721
        end
        object N32: TMenuItem
          Caption = '-'
        end
        object N31: TMenuItem
          Caption = #20179#20301#20195#30721
        end
        object N33: TMenuItem
          Caption = '-'
        end
        object N34: TMenuItem
          Caption = #23384#36135#21464#21160#21407#22240#20195#30721
        end
      end
    end
    object N7: TMenuItem
      Caption = #24110#21161
      object N95: TMenuItem
        Caption = #31995#32479#22522#30784#31649#29702
        object N92: TMenuItem
          Action = actBase_PowerLx
        end
        object N2: TMenuItem
          Action = actBase_WinName
        end
        object N98: TMenuItem
          Caption = '-'
        end
        object N78: TMenuItem
          Action = actBase_Power
        end
        object N99: TMenuItem
          Caption = '-'
        end
        object N85: TMenuItem
          Action = actAddUpdateFile
        end
        object N77: TMenuItem
          Caption = #28165#29702#36807#26399#28040#24687
        end
      end
      object N96: TMenuItem
        Caption = '-'
      end
      object N97: TMenuItem
        Caption = #20851#20110'...'
      end
    end
    object miFast: TMenuItem
      Caption = #24555#36895#21151#33021
      object test1: TMenuItem
        Caption = 'test'
      end
    end
  end
  object actlMain: TActionList
    Images = ImglNav
    Left = 128
    Top = 24
    object actClose: TAction
      Tag = -1
      Caption = #36864#20986#31995#32479
      ImageIndex = 7
      OnExecute = actCloseExecute
    end
    object actTest: TAction
      Caption = #27979#35797#19987#29992
      OnExecute = actTestExecute
    end
    object actTempLock: TAction
      Tag = -1
      Caption = #20020#26102#38145#23450
      ImageIndex = 1
      OnExecute = actTempLockExecute
    end
    object actChangePassword: TAction
      Tag = -1
      Caption = #20462#25913#23494#30721
      ImageIndex = 2
      OnExecute = actChangePasswordExecute
    end
    object actQuote: TAction
      Caption = #25253#20215#36164#26009#31649#29702
      ImageIndex = 11
      OnExecute = actQuoteExecute
    end
    object actSQL: TAction
      Caption = 'SQL'#25511#21046#21488
      ImageIndex = 5
      OnExecute = actSQLExecute
    end
    object actSysLog: TAction
      Caption = #31995#32479#26085#24535#26597#35810
      ImageIndex = 0
      OnExecute = actSysLogExecute
    end
    object actBase_FKFW: TAction
      Caption = #24133#23485#33539#22260
      ImageIndex = 6
      OnExecute = actBase_FKFWExecute
    end
    object actBase_YLLX: TAction
      Caption = #21407#26009#31867#22411
      ImageIndex = 6
      OnExecute = actBase_YLLXExecute
    end
    object actBase_YSMC: TAction
      Caption = #39068#33394#21517#31216
      ImageIndex = 6
      OnExecute = actBase_YSMCExecute
    end
    object actBase_CPZZ: TAction
      Caption = #20135#21697#32452#32455#31867#22411
      ImageIndex = 6
      OnExecute = actBase_CPZZExecute
    end
    object actUserManager: TAction
      Caption = #29992#25143#22411#31649#29702
      ImageIndex = 4
      OnExecute = actUserManagerExecute
    end
    object actBase_Power: TAction
      Caption = #31995#32479#26435#38480#21015#34920
      ImageIndex = 6
      OnExecute = actBase_PowerExecute
    end
    object actBase_PowerLx: TAction
      Caption = #31995#32479#26435#38480#22823#31867
      ImageIndex = 6
      OnExecute = actBase_PowerLxExecute
    end
    object actBase_Computer: TAction
      Caption = #21487#29992#24037#20316#31449#28857
      ImageIndex = 6
      OnExecute = actBase_ComputerExecute
    end
    object actBase_WinName: TAction
      Caption = #31995#32479#25152#26377#31383#21475
      ImageIndex = 6
      OnExecute = actBase_WinNameExecute
    end
    object actBase_Report: TAction
      Caption = #31995#32479#25253#34920#31649#29702
      ImageIndex = 6
      OnExecute = actBase_ReportExecute
    end
    object actBase_Stocker: TAction
      Caption = #20379#24212#21830#36164#26009
      ImageIndex = 6
      OnExecute = actBase_StockerExecute
    end
    object actBase_YLFG: TAction
      Caption = #21407#26009#39118#26684
      ImageIndex = 6
      OnExecute = actBase_YLFGExecute
    end
    object actCraftInput: TAction
      Caption = #24037#33402#36164#26009#24405#20837
      ImageIndex = 9
      OnExecute = actCraftInputExecute
    end
    object actBase_YLDM: TAction
      Caption = #21407#26009#24211
      ImageIndex = 6
      OnExecute = actBase_YLDMExecute
    end
    object actBase_YLSYFW: TAction
      Caption = #21407#26009#20351#29992#33539#22260
      ImageIndex = 6
      OnExecute = actBase_YLSYFWExecute
    end
    object actBase_HCLPrice: TAction
      Caption = #21518#22788#29702#20215#26684
      ImageIndex = 6
      OnExecute = actBase_HCLPriceExecute
    end
    object actChangeSysTime: TAction
      Caption = #20462#25913#31995#32479#26102#38388
    end
    object actAddUpdateFile: TAction
      Caption = #28155#21152#21319#32423#25991#20214
      ImageIndex = 5
      OnExecute = actAddUpdateFileExecute
    end
    object actCheckCraft: TAction
      Caption = #24037#33402#36164#26009#23457#26680
      ImageIndex = 10
      OnExecute = actCheckCraftExecute
    end
    object actSendMessage: TAction
      Caption = #21457#36865#28040#24687
      ImageIndex = 8
      OnExecute = actSendMessageExecute
    end
  end
  object ImglNav: TImageList
    Left = 161
    Top = 23
    Bitmap = {
      494C01010C000E00040010001000FFFFFFFFFF10FFFFFFFFFFFFFFFF424D3600
      0000000000003600000028000000400000004000000001002000000000000040
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000