ecscmain.dfm

一个电力企业的后台管理程序

inherited Form_Main: TForm_Main
  Left = 123
  Top = 49
  Width = 715
  Height = 458
  Caption = '电力客服数据管理系统'
  WindowState = wsMaximized
  PixelsPerInch = 96
  TextHeight = 12
  inherited StatusBar1: TStatusBar
    Top = 412
    Width = 707
    Panels = <
      item
        Text = 'sys'
        Width = 500
      end
      item
        Alignment = taCenter
        Text = 'time'
        Width = 160
      end
      item
        Text = 'user'
        Width = 300
      end>
  end
  inherited CoolBar1: TCoolBar
    Width = 707
    Bands = <
      item
        Control = ToolBar4
        ImageIndex = -1
        MinHeight = 20
        Width = 581
      end
      item
        Break = False
        Control = Animate1
        FixedSize = True
        HorizontalOnly = True
        ImageIndex = -1
        MinHeight = 30
        MinWidth = 120
        Width = 120
      end
      item
        Control = ToolBar1
        ImageIndex = -1
        MinHeight = 39
        Width = 703
      end
      item
        Control = URLs
        ImageIndex = -1
        MinHeight = 20
        Text = '地址'
        Width = 703
      end>
    inherited URLs: TComboBox [0]
      Width = 662
      ImeName = ''
    end
    inherited ToolBar1: TToolBar [1]
      Width = 690
      ButtonWidth = 103
      Transparent = False
      inherited Btn_Back: TToolButton
        AutoSize = True
      end
      inherited Btn_Forward: TToolButton
        AutoSize = True
      end
      inherited Btn_Stop: TToolButton
        AutoSize = True
      end
      inherited Btn_Refresh: TToolButton
        AutoSize = True
      end
      object TB_postmail: TToolButton
        Left = 148
        Top = 0
        Action = Act_postmail
        AutoSize = True
        Enabled = False
        Visible = False
      end
      object TB_Counseling: TToolButton
        Left = 207
        Top = 0
        AutoSize = True
        Caption = '业务咨询数据维护'
        ImageIndex = 10
        Visible = False
        OnClick = Act_yw_counselingExecute
      end
      object ToolButton2: TToolButton
        Left = 314
        Top = 0
        Caption = '员工工作状态'
        ImageIndex = 6
        Visible = False
        OnClick = ToolButton2Click
      end
      object ToolButton3: TToolButton
        Left = 417
        Top = 0
        Caption = '数据备份'
        ImageIndex = 7
        Visible = False
        OnClick = ToolButton3Click
      end
      object TB_Quit: TToolButton
        Left = 520
        Top = 0
        Action = Act_Quit
        AutoSize = True
      end
    end
    inherited Animate1: TAnimate [2]
      Left = 583
      FileName = '中国_电力.avi'
      StopFrame = 57
    end
    inherited ToolBar4: TToolBar
      Width = 577
      ButtonWidth = 79
      Wrapable = False
      object TB_Set: TToolButton
        Left = 70
        Top = 0
        Hint = '基本设置'
        AutoSize = True
        Caption = '基本设置'
        MenuItem = mmi_Set
      end
      object TB_SysData: TToolButton
        Left = 129
        Top = 0
        Hint = '系统数据维护'
        AutoSize = True
        Caption = '系统数据维护'
        MenuItem = mmi_SysData
        Visible = False
      end
      object TB_Yw: TToolButton
        Left = 212
        Top = 0
        Hint = '业务数据维护'
        AutoSize = True
        Caption = '业务数据维护'
        MenuItem = mmi_yw
        Visible = False
      end
      object TB_Static: TToolButton
        Left = 295
        Top = 0
        Hint = '统计报表'
        AutoSize = True
        Caption = '统计报表'
        MenuItem = mmi_Static
        Visible = False
      end
      object ToolButton10: TToolButton
        Left = 354
        Top = 0
        Hint = '帮助'
        Caption = '帮助'
        MenuItem = nHelp
        Visible = False
      end
    end
  end
  inherited WebBrowser1: TWebBrowser
    Width = 707
    Height = 315
    ControlData = {
      4C00000029330000761700000100000005000000000000000000000000000000
      000000004C000000000000000000000001000000E0D057007335CF11AE690800
      2B2E126208000000000000004C0000000114020000000000C000000000000046
      8000000000000000000000000000000000000000000000000000000000000000
      0000000000000000010000000000000000000000000000000000000000000000
      FC624B0058764A0078194A00}
  end
  inherited MainMenu_Menu: TMainMenu
    inherited mmi_User: TMenuItem
      ImageIndex = 5
      OnClick = Act_QuitExecute
      inherited mmi_User_Relogin: TMenuItem
        OnClick = Act_user_reloginExecute
      end
    end
    object mmi_Set: TMenuItem [2]
      Caption = '基本设置'
      Hint = '基本设置'
      object mmi_Set_SysConfig: TMenuItem
        Caption = '系统参数设置'
        ImageIndex = 6
        Visible = False
        OnClick = Act_Set_SysConfigExecute
      end
      object mmi_Set_SysRole: TMenuItem
        Caption = '系统角色设置'
        ImageIndex = 7
        OnClick = Act_Set_SysRoleExecute
      end
      object mmi_Set_Dept: TMenuItem
        Caption = '工作部门设置'
        ImageIndex = 8
        OnClick = Act_Set_DeptExecute
      end
      object N44: TMenuItem
        Caption = '-'
        Visible = False
      end
      object mmi_Set_LoginManager: TMenuItem
        Caption = '操作员工管理'
        ImageIndex = 9
        OnClick = Act_Set_LoginManagerExecute
      end
      object mmi_Set_PersonPhone: TMenuItem
        Caption = '联系电话管理'
        Visible = False
        OnClick = Act_Set_personphoneExecute
      end
      object N3: TMenuItem
        Caption = '-'
      end
      object N4: TMenuItem
        Caption = '首页设置'
        OnClick = N4Click
      end
    end
    object mmi_SysData: TMenuItem [3]
      Caption = '系统数据维护'
      Hint = '系统数据维护'
      Visible = False
      object mmi_SysData_Hostconfig: TMenuItem
        Caption = '系统存储设备'
        Visible = False
        OnClick = Act_SysData_HostConfigExecute
      end
      object mmi_SysData_IVRParam: TMenuItem
        Caption = '语音存储配置'
        OnClick = Act_SysData_ivrparamExecute
      end
      object mmi_SysData_PhoneLine: TMenuItem
        Caption = '座席线路配置'
        OnClick = act_SysData_PhoneLineExecute
      end
      object N5: TMenuItem
        Caption = '-'
      end
      object N7: TMenuItem
        Action = Act_postmail
        Enabled = False
        Visible = False
      end
    end
    object mmi_yw: TMenuItem [4]
      Caption = '业务数据维护'
      Hint = '业务数据维护'
      Visible = False
      object mmi_yw_counseling: TMenuItem
        Caption = '业务咨询数据维护'
        ImageIndex = 10
        OnClick = Act_yw_counselingExecute
      end
      object mmi_yw_delete: TMenuItem
        Caption = '受理话单批量删除'
        OnClick = Act_yw_deleteExecute
      end
      object N14: TMenuItem
        Caption = '-'
      end
      object N15: TMenuItem
        Caption = '接收端部门设置'
        OnClick = N15Click
      end
    end
    object mmi_Static: TMenuItem [5]
      Caption = '统计报表'
      Hint = '统计报表'
      Visible = False
      object mmi_static_workstate: TMenuItem
        Action = Act_Static_WorkState
      end
      object N9: TMenuItem
        Action = Act_AgentWork
      end
      object N12: TMenuItem
        Caption = '-'
      end
      object mmi_Static_FaultStatic: TMenuItem
        Action = Act_Static_FaultStatic
      end
      object mmi_Static_ProgramStatic: TMenuItem
        Action = Act_Static_ProgramStatic
      end
      object mmi_Static_Trend: TMenuItem
        Action = Act_static_trend
      end
      object mmi_Static_DeptStatic: TMenuItem
        Caption = '用电申请统计'
        OnClick = mmi_Static_DeptStaticClick
      end
      object N13: TMenuItem
        Caption = '-'
      end
      object mmi_Static_DealState: TMenuItem
        Action = Act_Static_DealState
      end
      object N10: TMenuItem