agentcountfrm.~dfm

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

~DFM
394
字号
object Frm_AgentCount: TFrm_AgentCount
  Left = 223
  Top = 89
  BorderStyle = bsSingle
  Caption = '座席业务统计'
  ClientHeight = 280
  ClientWidth = 373
  Color = clBtnFace
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = '宋体'
  Font.Style = []
  OldCreateOrder = False
  Position = poMainFormCenter
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 12
  object PageControl1: TPageControl
    Left = 0
    Top = 0
    Width = 373
    Height = 280
    ActivePage = TabSheet1
    Align = alClient
    TabOrder = 0
    object TabSheet1: TTabSheet
      Caption = '座席业务统计'
      object DsFancyButton1: TDsFancyButton
        Left = 144
        Top = 77
        Width = 87
        Height = 23
        ButtonColor = 12246235
        Caption = '确   定'
        FrameColor = 8306365
        FrameWidth = 4
        CornerRadius = 10
        Shape = shCapsule
        TextStyle = txRaised
        OnClick = DsFancyButton1Click
      end
      object DsFancyButton2: TDsFancyButton
        Left = 266
        Top = 75
        Width = 97
        Height = 25
        ButtonColor = 16773861
        Caption = '取   消'
        FrameColor = 16762766
        FrameWidth = 4
        CornerRadius = 10
        Shape = shCapsule
        TextStyle = txRaised
      end
      object DsFancyButton3: TDsFancyButton
        Left = 152
        Top = 85
        Width = 87
        Height = 23
        ButtonColor = 12246235
        Caption = '确   定'
        FrameColor = 8306365
        FrameWidth = 4
        CornerRadius = 10
        Shape = shCapsule
        TextStyle = txRaised
        OnClick = DsFancyButton1Click
      end
      object DsFancyButton4: TDsFancyButton
        Left = 273
        Top = 83
        Width = 97
        Height = 25
        ButtonColor = 16773861
        Caption = '取   消'
        FrameColor = 16762766
        FrameWidth = 4
        CornerRadius = 10
        Shape = shCapsule
        TextStyle = txRaised
      end
      object DsFancyButton7: TDsFancyButton
        Left = 144
        Top = 2
        Width = 87
        Height = 23
        ButtonColor = 12246235
        Caption = '确   定'
        FrameColor = 8306365
        FrameWidth = 4
        CornerRadius = 10
        Shape = shCapsule
        TextStyle = txRaised
        OnClick = DsFancyButton1Click
      end
      object DsFancyButton8: TDsFancyButton
        Left = 256
        Top = 0
        Width = 97
        Height = 25
        ButtonColor = 16773861
        Caption = '取   消'
        FrameColor = 16762766
        FrameWidth = 4
        CornerRadius = 10
        Shape = shCapsule
        TextStyle = txRaised
      end
      object Panel1: TPanel
        Left = 0
        Top = 0
        Width = 365
        Height = 58
        Align = alTop
        BevelOuter = bvNone
        Color = 16775408
        TabOrder = 0
        object Label1: TLabel
          Left = 12
          Top = 11
          Width = 48
          Height = 12
          Caption = '统计类别'
          Font.Charset = ANSI_CHARSET
          Font.Color = 4194304
          Font.Height = -12
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
        end
        object Bevel2: TBevel
          Left = 3
          Top = 54
          Width = 363
          Height = 50
          Shape = bsTopLine
        end
        object RB_ByWorkId: TRadioButton
          Left = 75
          Top = 32
          Width = 113
          Height = 17
          Caption = '按工号统计'
          Checked = True
          Font.Charset = ANSI_CHARSET
          Font.Color = 9805
          Font.Height = -12
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
          TabOrder = 0
          TabStop = True
        end
        object RB_ByType: TRadioButton
          Left = 225
          Top = 30
          Width = 105
          Height = 18
          Caption = '按业务类型统计'
          Font.Charset = ANSI_CHARSET
          Font.Color = 9805
          Font.Height = -12
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
          TabOrder = 1
        end
      end
      object Panel2: TPanel
        Left = 0
        Top = 58
        Width = 365
        Height = 91
        Align = alTop
        BevelOuter = bvNone
        Color = 16775408
        TabOrder = 1
        object Label2: TLabel
          Left = 150
          Top = 19
          Width = 24
          Height = 12
          Caption = '日期'
          Font.Charset = ANSI_CHARSET
          Font.Color = 9805
          Font.Height = -12
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
        end
        object Label3: TLabel
          Left = 150
          Top = 57
          Width = 24
          Height = 12
          Caption = '年度'
          Font.Charset = ANSI_CHARSET
          Font.Color = 9805
          Font.Height = -12
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
        end
        object Label4: TLabel
          Left = 254
          Top = 57
          Width = 24
          Height = 12
          Caption = '月份'
        end
        object RB_ByDay: TRadioButton
          Left = 34
          Top = 16
          Width = 69
          Height = 17
          Caption = '按日统计'
          Checked = True
          Font.Charset = ANSI_CHARSET
          Font.Color = 9805
          Font.Height = -12
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
          TabOrder = 0
          TabStop = True
          OnClick = RB_ByDayClick
        end
        object RB_ByMonth: TRadioButton
          Left = 34
          Top = 56
          Width = 72
          Height = 17
          Caption = '按月统计'
          Font.Charset = ANSI_CHARSET
          Font.Color = 9805
          Font.Height = -12
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
          TabOrder = 1
          OnClick = RB_ByMonthClick
        end
        object DTP_Date: TDateTimePicker
          Left = 197
          Top = 15
          Width = 127
          Height = 20
          CalAlignment = dtaLeft
          Date = 37291.4797465393
          Time = 37291.4797465393
          DateFormat = dfLong
          DateMode = dmUpDown
          ImeName = '中文 (简体) - 微软拼音'
          Kind = dtkDate
          ParseInput = False
          TabOrder = 2
        end
        object SE_Year: TSpinEdit
          Left = 197
          Top = 52
          Width = 55
          Height = 21
          MaxValue = 3000
          MinValue = 1999
          TabOrder = 3
          Value = 1999
        end
        object SE_Month: TSpinEdit
          Left = 282
          Top = 53
          Width = 43
          Height = 21
          MaxValue = 12
          MinValue = 1
          TabOrder = 4
          Value = 1
        end
      end
      object Panel3: TPanel
        Left = 0
        Top = 149
        Width = 365
        Height = 108
        Align = alTop
        BevelOuter = bvLowered
        Color = 16775408
        TabOrder = 2
        object she: TDsFancyButton
          Left = 245
          Top = 27
          Width = 83
          Height = 22
          ButtonColor = 15391410
          Caption = '自定义报表'
          FrameColor = 15391410
          FrameWidth = 4
          CornerRadius = 10
          Shape = shCapsule
          TextStyle = txRaised
          Visible = False
          OnClick = sheClick
        end
        object Label5: TLabel
          Left = 18
          Top = 13
          Width = 48
          Height = 12
          Caption = '报表模式'
          Font.Charset = ANSI_CHARSET
          Font.Color = 4194304
          Font.Height = -12
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
        end
        object Bevel1: TBevel
          Left = 211
          Top = 0
          Width = 1
          Height = 79
          Shape = bsLeftLine
        end
        object RB_Normal: TRadioButton
          Left = 17
          Top = 41
          Width = 71
          Height = 17
          Caption = '一般报表'
          Checked = True
          Font.Charset = ANSI_CHARSET
          Font.Color = 9805
          Font.Height = -12
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
          TabOrder = 0
          TabStop = True
        end
        object RB_Word: TRadioButton
          Left = 109
          Top = 41
          Width = 82
          Height = 17
          Caption = 'WORD报表'
          Font.Charset = ANSI_CHARSET
          Font.Color = 9805
          Font.Height = -12
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
          TabOrder = 1
        end
        object Panel4: TPanel
          Left = -1
          Top = 72
          Width = 371
          Height = 41
          Color = 12422417
          TabOrder = 2
          object DsFancyButton5: TDsFancyButton
            Left = 112
            Top = 10
            Width = 79
            Height = 20
            ButtonColor = 15391410
            Caption = '确   定'
            FrameColor = 15391410
            FrameWidth = 4
            CornerRadius = 10
            Shape = shCapsule
            TextStyle = txRaised
            OnClick = DsFancyButton1Click
          end
          object DsFancyButton6: TDsFancyButton
            Left = 215
            Top = 9
            Width = 76
            Height = 21
            ButtonColor = 15391410
            Caption = '取   消'
            FrameColor = 15391410
            FrameWidth = 4
            CornerRadius = 10
            Shape = shCapsule
            TextStyle = txRaised
            OnClick = DsFancyButton6Click
          end
        end
      end
    end
  end
end

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?