maincjfm.dfm

一个电力部门的催缴费用系统

object FM_MainCj: TFM_MainCj
  Left = 92
  Top = 118
  Width = 748
  Height = 559
  Caption = '电力客户服务中心--催缴系统'
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = '宋体'
  Font.Style = []
  Menu = mm_Main
  OldCreateOrder = False
  Position = poScreenCenter
  WindowState = wsMaximized
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 12
  object Splitter1: TSplitter
    Left = 113
    Top = 0
    Width = 4
    Height = 495
    Cursor = crHSplit
  end
  object stb_Main: TStatusBar
    Left = 0
    Top = 495
    Width = 740
    Height = 18
    Panels = <
      item
        Width = 200
      end
      item
        Width = 180
      end
      item
        Width = 50
      end>
    SimplePanel = False
  end
  object fcOutlookBar1: TfcOutlookBar
    Left = 0
    Top = 0
    Width = 113
    Height = 495
    ActivePage = fcOutlookBar1fcShapeBtn2
    Align = alLeft
    Animation.Enabled = True
    Animation.Interval = 1
    Animation.Steps = 7
    AutoBold = False
    BevelOuter = bvNone
    BorderStyle = bsSingle
    ButtonSize = 20
    ButtonClassName = 'TfcShapeBtn'
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -14
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
    Layout = loVertical
    Options = [cboAutoCreateOutlookList]
    PanelAlignment = paDynamic
    ShowButtons = True
    TabOrder = 1
    object fcOutlookBar1fcShapeBtn1: TfcShapeBtn
      Left = 0
      Top = 0
      Width = 109
      Height = 20
      Caption = '系统设置'
      Color = clBtnFace
      DitherColor = clWhite
      GroupIndex = 1
      ParentClipping = False
      RoundRectBias = 25
      ShadeStyle = fbsHighlight
      TabOrder = 0
      TextOptions.Alignment = taCenter
      TextOptions.VAlignment = vaVCenter
    end
    object fcOutlookBar1fcShapeBtn2: TfcShapeBtn
      Left = 0
      Top = 20
      Width = 109
      Height = 20
      Caption = '催缴用户信息'
      Color = clBtnFace
      DitherColor = clWhite
      Down = True
      GroupIndex = 1
      NumGlyphs = 0
      ParentClipping = False
      RoundRectBias = 25
      ShadeStyle = fbsHighlight
      TabOrder = 2
      TextOptions.Alignment = taCenter
      TextOptions.VAlignment = vaVCenter
    end
    object TfcOutlookPanel
      Left = 0
      Top = 0
      Width = 109
      Height = 0
      object fcOutlookBar1OutlookList1: TfcOutlookList
        Left = 0
        Top = 0
        Width = 109
        Height = 0
        Align = alClient
        BorderStyle = bsNone
        ClickStyle = csClick
        Color = clBtnShadow
        Font.Charset = GB2312_CHARSET
        Font.Color = clWhite
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        HotTrackStyle = hsIconHilite
        Images = imglst_Main
        ItemHighlightColor = clBtnFace
        ItemHotTrackColor = clBtnShadow
        ItemLayout = blGlyphTop
        ItemShadowColor = clBtnText
        ItemSelectedDitherColor = clBtnHighlight
        Items = <
          item
            Action = actn_SysSet_CjUser
            ImageIndex = 0
            Selected = False
            Separation = 10
            Tag = 0
            Text = '催缴用户管理'
          end
          item
            Action = actn_SysSet_TimeTable
            ImageIndex = 1
            Selected = False
            Separation = 10
            Tag = 0
            Text = '催缴时刻设置'
          end>
        ItemSpacing = 20
        ItemsWidth = 0
        Layout = loVertical
        ScrollButtonsVisible = True
        ScrollInterval = 250
        Transparent = False
      end
    end
    object TfcOutlookPanel
      Left = 0
      Top = 40
      Width = 109
      Height = 451
      object fcOutlookBar1OutlookList2: TfcOutlookList
        Left = 0
        Top = 0
        Width = 109
        Height = 451
        Align = alClient
        BorderStyle = bsNone
        ClickStyle = csClick
        Color = clBtnShadow
        Font.Charset = GB2312_CHARSET
        Font.Color = clWhite
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        HotTrackStyle = hsIconHilite
        Images = imglst_Main
        ItemHighlightColor = clBtnFace
        ItemHotTrackColor = clBtnShadow
        ItemLayout = blGlyphTop
        ItemShadowColor = clBtnText
        ItemSelectedDitherColor = clBtnHighlight
        Items = <
          item
            Action = actn_User_Import
            ImageIndex = 2
            Selected = False
            Separation = 10
            Tag = 0
            Text = '催缴用户导入'
          end
          item
            Action = actn_User_Info
            ImageIndex = 3
            Selected = False
            Separation = 10
            Tag = 0
            Text = '催缴用户详单'
          end
          item
            Action = actn_User_Statistics
            ImageIndex = 4
            Selected = False
            Separation = 10
            Tag = 0
            Text = '催缴情况统计'
          end>
        ItemSpacing = 20
        ItemsWidth = 0
        Layout = loVertical
        ScrollButtonsVisible = True
        ScrollInterval = 250
        Transparent = False
      end
    end
  end
  object pnl_Main: TPanel
    Left = 117
    Top = 0
    Width = 623
    Height = 495
    Align = alClient
    BevelOuter = bvNone
    TabOrder = 2
    object pnl_Top: TPanel
      Left = 0
      Top = 0
      Width = 623
      Height = 27
      Align = alTop
      BevelOuter = bvNone
      BevelWidth = 5
      Color = clGrayText
      TabOrder = 0
      object lbl_Title: TLabel
        Left = 12
        Top = 3
        Width = 99
        Height = 20
        Caption = 'lbl_Title'
        Font.Charset = GB2312_CHARSET
        Font.Color = clWhite
        Font.Height = -20
        Font.Name = '宋体'
        Font.Style = [fsBold]
        ParentFont = False
      end
    end
    object pnl_Client: TPanel
      Left = 0
      Top = 27
      Width = 623
      Height = 468
      Align = alClient
      BevelOuter = bvLowered
      TabOrder = 1
    end
  end
  object mm_Main: TMainMenu
    Left = 144
    Top = 40
    object mmi_File: TMenuItem
      Caption = '文件(&F)'
      object mmi_File_Exit: TMenuItem
        Action = actn_File_Quit
      end
    end
    object mmi_SysSet: TMenuItem
      Caption = '系统设置(&S)'
      object mmi_SysSet_CjUser: TMenuItem
        Action = actn_SysSet_CjUser
      end
      object mmi_SysSet_TimeTable: TMenuItem
        Action = actn_SysSet_TimeTable
      end
    end
    object mmi_User: TMenuItem
      Caption = '催缴用户信息(&U)'
      object mmi_User_Import: TMenuItem
        Action = actn_User_Import
      end
      object mmi_User_Info: TMenuItem
        Action = actn_User_Info