⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 rsqkqxfs.dfm

📁 用delphi开发的 人事管理系统
💻 DFM
字号:
object frm_rsqkqxfs: Tfrm_rsqkqxfs
  Left = 151
  Top = 121
  Width = 598
  Height = 406
  Caption = 'frm_rsqkqxfs'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsMDIChild
  OldCreateOrder = False
  Position = poMainFormCenter
  Visible = True
  OnClose = FormClose
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 590
    Height = 41
    Align = alTop
    TabOrder = 0
    object Label2: TLabel
      Left = 181
      Top = 10
      Width = 226
      Height = 29
      Caption = '人事情况曲线分析图'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clInfoBk
      Font.Height = -24
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      Transparent = True
    end
    object Label1: TLabel
      Left = 180
      Top = 10
      Width = 226
      Height = 29
      Caption = '人事情况曲线分析图'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clRed
      Font.Height = -24
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      Transparent = True
    end
  end
  object Panel2: TPanel
    Left = 0
    Top = 41
    Width = 590
    Height = 338
    Align = alClient
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -15
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
    TabOrder = 1
    object Bevel1: TBevel
      Left = 16
      Top = 64
      Width = 121
      Height = 213
      Style = bsRaised
    end
    object Bevel2: TBevel
      Left = 16
      Top = 11
      Width = 121
      Height = 41
      Style = bsRaised
    end
    object DBChart1: TDBChart
      Left = 160
      Top = 12
      Width = 417
      Height = 313
      AllowPanning = pmNone
      AllowZoom = False
      BackWall.Brush.Color = clWhite
      BackWall.Brush.Style = bsClear
      BackWall.Pen.Visible = False
      Title.Font.Charset = GB2312_CHARSET
      Title.Font.Color = clBlue
      Title.Font.Height = -15
      Title.Font.Name = '宋体'
      Title.Font.Style = []
      Title.Text.Strings = (
        '人事曲线分析')
      AxisVisible = False
      ClipPoints = False
      Frame.Visible = False
      Legend.TextStyle = ltsRightValue
      View3DOptions.Elevation = 315
      View3DOptions.Orthogonal = False
      View3DOptions.Perspective = 0
      View3DOptions.Rotation = 360
      View3DOptions.Zoom = 99
      View3DWalls = False
      BevelInner = bvLowered
      TabOrder = 0
      object Series1: TPieSeries
        Marks.ArrowLength = 8
        Marks.Style = smsLabelPercentTotal
        Marks.Visible = True
        DataSource = Query1
        SeriesColor = clRed
        XLabelsSource = 'hl'
        OtherSlice.Text = 'Other'
        PieValues.DateTime = False
        PieValues.Name = 'Pie'
        PieValues.Multiplier = 1
        PieValues.Order = loNone
        PieValues.ValueSource = 'rs'
      end
    end
    object CheckBox1: TCheckBox
      Left = 30
      Top = 23
      Width = 67
      Height = 17
      Caption = '3D效果'
      Checked = True
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      State = cbChecked
      TabOrder = 1
      OnClick = CheckBox1Click
    end
    object RadioButton1: TRadioButton
      Left = 28
      Top = 82
      Width = 97
      Height = 17
      Caption = '按性别生成'
      Checked = True
      TabOrder = 2
      TabStop = True
    end
    object RadioButton2: TRadioButton
      Left = 27
      Top = 122
      Width = 98
      Height = 17
      Caption = '按学历生成'
      TabOrder = 3
    end
    object RadioButton3: TRadioButton
      Left = 28
      Top = 159
      Width = 95
      Height = 17
      Caption = '按部门生成'
      TabOrder = 4
    end
    object RadioButton4: TRadioButton
      Left = 28
      Top = 197
      Width = 97
      Height = 17
      Caption = '按职称生成'
      TabOrder = 5
    end
    object RadioButton5: TRadioButton
      Left = 28
      Top = 236
      Width = 97
      Height = 17
      Caption = '按职务生成'
      TabOrder = 6
    end
    object Button1: TButton
      Left = 32
      Top = 293
      Width = 75
      Height = 25
      Caption = '生成曲线'
      TabOrder = 7
      OnClick = Button1Click
    end
  end
  object Query1: TQuery
    Active = True
    DatabaseName = 'rsgzgl'
    SQL.Strings = (
      'select count(*) rs,xb hl from ygzlb group by xb')
    Left = 64
    Top = 9
  end
end

⌨️ 快捷键说明

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