callrecordform.dfm

来自「一个电力企业的后台管理程序」· DFM 代码 · 共 404 行

object Frm_CallRep: TFrm_CallRep
  Left = 246
  Top = 75
  Width = 388
  Height = 412
  Caption = '呼入、呼出话单统计'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object PC_Content: TPageControl
    Left = 0
    Top = 0
    Width = 380
    Height = 341
    ActivePage = TabSheet1
    Align = alClient
    Font.Charset = ANSI_CHARSET
    Font.Color = 9805
    Font.Height = -15
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
    TabOrder = 0
    object TabSheet1: TTabSheet
      Caption = '座席状态记录统计'
      Font.Charset = ANSI_CHARSET
      Font.Color = 9805
      Font.Height = -15
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      object Panel3: TPanel
        Left = 0
        Top = 250
        Width = 372
        Height = 61
        Align = alBottom
        Color = 16775408
        Font.Charset = ANSI_CHARSET
        Font.Color = 9805
        Font.Height = -15
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
        TabOrder = 0
        object Bevel1: TBevel
          Left = 202
          Top = 2
          Width = 3
          Height = 58
          Shape = bsLeftLine
        end
        object Rb_Normal: TRadioButton
          Left = 8
          Top = 24
          Width = 83
          Height = 17
          Caption = '一般报表'
          Checked = True
          TabOrder = 0
          TabStop = True
        end
        object Rb_Word: TRadioButton
          Left = 104
          Top = 24
          Width = 86
          Height = 17
          Caption = 'WORD报表'
          TabOrder = 1
        end
        object Sb_SelfDef: TfcShapeBtn
          Left = 242
          Top = 19
          Width = 96
          Height = 25
          Caption = '自定义报表'
          Color = clBtnFace
          DitherColor = clWhite
          NumGlyphs = 0
          ParentClipping = True
          RoundRectBias = 25
          ShadeStyle = fbsHighlight
          Shape = bsRoundRect
          TabOrder = 2
          TextOptions.Alignment = taCenter
          TextOptions.VAlignment = vaVCenter
          OnClick = Sb_SelfDefClick
        end
      end
      object Panel4: TPanel
        Left = 0
        Top = 0
        Width = 372
        Height = 177
        Align = alClient
        Color = 16775408
        Font.Charset = ANSI_CHARSET
        Font.Color = 9805
        Font.Height = -15
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
        TabOrder = 1
        object Label2: TLabel
          Left = 9
          Top = 150
          Width = 75
          Height = 15
          Caption = '座席员工号'
        end
        object Label6: TLabel
          Left = 46
          Top = 105
          Width = 8
          Height = 15
        end
        object Label7: TLabel
          Left = 45
          Top = 57
          Width = 90
          Height = 15
          Caption = '是否呼叫成功'
        end
        object Label8: TLabel
          Left = 45
          Top = 119
          Width = 90
          Height = 15
          Caption = '是否排队溢出'
        end
        object Label9: TLabel
          Left = 45
          Top = 87
          Width = 105
          Height = 15
          Caption = '是否座席先挂机'
        end
        object Panel5: TPanel
          Left = 1
          Top = 1
          Width = 370
          Height = 19
          Align = alTop
          BevelOuter = bvNone
          Color = 12422417
          TabOrder = 0
          object Label1: TLabel
            Left = 5
            Top = 3
            Width = 90
            Height = 15
            Caption = '统计条件设置'
            Font.Charset = ANSI_CHARSET
            Font.Color = 9805
            Font.Height = -15
            Font.Name = '宋体'
            Font.Style = []
            ParentFont = False
          end
        end
        object RB_CallIn: TRadioButton
          Left = 37
          Top = 31
          Width = 83
          Height = 17
          Caption = '呼入话单'
          Checked = True
          TabOrder = 1
          TabStop = True
          OnClick = RB_CallInClick
        end
        object RB_CallOut: TRadioButton
          Left = 248
          Top = 29
          Width = 82
          Height = 17
          Caption = '呼出话单'
          TabOrder = 2
          OnClick = RB_CallOutClick
        end
        object SB_SelWork: TfcShapeBtn
          Left = 291
          Top = 144
          Width = 75
          Height = 25
          Caption = '选择工号'
          Color = clBtnFace
          DitherColor = clWhite
          ParentClipping = True
          RoundRectBias = 25
          ShadeStyle = fbsHighlight
          Shape = bsRoundRect
          TabOrder = 3
          TextOptions.Alignment = taCenter
          TextOptions.VAlignment = vaVCenter
          OnClick = SB_SelWorkClick
        end
        object Edt_SeledWork: TEdit
          Left = 93
          Top = 146
          Width = 193
          Height = 23
          ImeName = '中文 (简体) - 微软拼音'
          ReadOnly = True
          TabOrder = 4
        end
        object Cb_CallSuc: TComboBox
          Left = 156
          Top = 53
          Width = 131
          Height = 23
          ImeName = '中文 (简体) - 微软拼音'
          ItemHeight = 15
          TabOrder = 5
          Text = 'Cb_CallSuc'
          Items.Strings = (
            '全部'
            '是'
            '否')
        end
        object Cb_OverFlow: TComboBox
          Left = 156
          Top = 115
          Width = 131
          Height = 23
          ImeName = '中文 (简体) - 微软拼音'
          ItemHeight = 15
          TabOrder = 6
          Text = 'Cb_OverFlow'
          Items.Strings = (
            '全部'
            '是'
            '否')
        end
        object Cb_HangUp: TComboBox
          Left = 156
          Top = 84
          Width = 131
          Height = 23
          ImeName = '中文 (简体) - 微软拼音'
          ItemHeight = 15
          TabOrder = 7
          Text = 'Cb_HangUp'
          Items.Strings = (
            '全部'
            '是'
            '否')
        end
      end
      object Panel2: TPanel
        Left = 0
        Top = 177
        Width = 372
        Height = 73
        Align = alBottom
        Color = 16775408
        Font.Charset = ANSI_CHARSET
        Font.Color = 9805
        Font.Height = -15
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
        TabOrder = 2
        object Label3: TLabel
          Left = 155
          Top = 14
          Width = 30
          Height = 15
          Caption = '日期'
        end
        object Label4: TLabel
          Left = 154
          Top = 46
          Width = 30
          Height = 15
          Caption = '年度'
        end
        object Label5: TLabel
          Left = 254
          Top = 47
          Width = 30
          Height = 15
          Caption = '月份'
        end
        object RB_ByDay: TRadioButton
          Left = 45
          Top = 14
          Width = 85
          Height = 17
          Caption = '按日统计'
          Checked = True
          TabOrder = 0
          TabStop = True
          OnClick = RB_ByDayClick
        end
        object Rb_ByMon: TRadioButton
          Left = 46
          Top = 45
          Width = 83
          Height = 17
          Caption = '按月统计'
          TabOrder = 1
          OnClick = Rb_ByMonClick
        end
        object DTP_CountDate: TDateTimePicker
          Left = 192
          Top = 10
          Width = 137
          Height = 23
          CalAlignment = dtaLeft
          Date = 37371.6307157755
          Time = 37371.6307157755
          DateFormat = dfLong
          DateMode = dmComboBox
          ImeName = '中文 (简体) - 微软拼音'
          Kind = dtkDate
          ParseInput = False
          TabOrder = 2
        end
        object Se_Year: TSpinEdit
          Left = 193
          Top = 42
          Width = 55
          Height = 24
          Enabled = False
          MaxValue = 2050
          MinValue = 1995
          TabOrder = 3
          Value = 1995
        end
        object Se_Mon: TSpinEdit
          Left = 288
          Top = 42
          Width = 41
          Height = 24
          Enabled = False
          MaxValue = 12
          MinValue = 1
          TabOrder = 4
          Value = 1
        end
      end
    end
  end
  object Panel1: TPanel
    Left = 0
    Top = 341
    Width = 380
    Height = 44
    Align = alBottom
    Color = 12422417
    Font.Charset = ANSI_CHARSET
    Font.Color = 9805
    Font.Height = -15
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
    TabOrder = 1
    object Se_Ok: TfcShapeBtn
      Left = 201
      Top = 14
      Width = 75
      Height = 25
      Caption = '确定'
      Color = clBtnFace
      DitherColor = clWhite
      NumGlyphs = 0
      ParentClipping = True
      RoundRectBias = 25
      ShadeStyle = fbsHighlight
      Shape = bsRoundRect
      TabOrder = 0
      TextOptions.Alignment = taCenter
      TextOptions.VAlignment = vaVCenter
      OnClick = Se_OkClick
    end
    object Se_Cancel: TfcShapeBtn
      Left = 296
      Top = 14
      Width = 75
      Height = 25
      Caption = '取消'
      Color = clBtnFace
      DitherColor = clWhite
      NumGlyphs = 0
      ParentClipping = True
      RoundRectBias = 25
      ShadeStyle = fbsHighlight
      Shape = bsRoundRect
      TabOrder = 1
      TextOptions.Alignment = taCenter
      TextOptions.VAlignment = vaVCenter
      OnClick = Se_CancelClick
    end
  end
end