📄 main_tb_zgtbform.~dfm
字号:
object main_tb_zgtb: Tmain_tb_zgtb
Left = 614
Top = 575
BorderIcons = []
BorderStyle = bsDialog
Caption = '职工档案统计图表'
ClientHeight = 303
ClientWidth = 801
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = '宋体'
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
OnClose = FormClose
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object Bevel1: TBevel
Left = 0
Top = 0
Width = 801
Height = 303
Align = alClient
Style = bsRaised
end
object DecisionPivot1: TDecisionPivot
Left = 6
Top = 3
Width = 741
Height = 29
ButtonAutoSize = True
DecisionSource = DecisionSource1
GroupLayout = xtHorizontal
Groups = [xtRows, xtColumns, xtSummaries]
ButtonSpacing = 0
ButtonWidth = 64
ButtonHeight = 24
GroupSpacing = 10
BorderWidth = 0
BorderStyle = bsNone
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -15
Font.Name = '宋体'
Font.Style = []
ParentFont = False
TabOrder = 0
end
object DecisionGraph1: TDecisionGraph
Left = 6
Top = 40
Width = 787
Height = 257
DecisionSource = DecisionSource1
Title.Font.Charset = DEFAULT_CHARSET
Title.Font.Color = clNavy
Title.Font.Height = -21
Title.Font.Name = 'Arial'
Title.Font.Style = [fsBold, fsItalic]
Title.Text.Strings = (
'职工档案人数统计图表')
BottomAxis.Title.Font.Charset = DEFAULT_CHARSET
BottomAxis.Title.Font.Color = clNavy
BottomAxis.Title.Font.Height = -13
BottomAxis.Title.Font.Name = 'Arial'
BottomAxis.Title.Font.Style = [fsBold]
LeftAxis.Title.Font.Charset = DEFAULT_CHARSET
LeftAxis.Title.Font.Color = clNavy
LeftAxis.Title.Font.Height = -13
LeftAxis.Title.Font.Name = 'Arial'
LeftAxis.Title.Font.Style = [fsBold]
Legend.Color = 16771513
Legend.ColorWidth = 15
Legend.Font.Charset = DEFAULT_CHARSET
Legend.Font.Color = clBlack
Legend.Font.Height = -13
Legend.Font.Name = 'Arial'
Legend.Font.Style = []
Legend.TopPos = 19
BevelOuter = bvLowered
TabOrder = 1
object Series1: TBarSeries
Active = False
Marks.ArrowLength = 20
Marks.Visible = False
SeriesColor = clRed
Title = 'Template: 工作部门'
XValues.DateTime = False
XValues.Name = 'X'
XValues.Multiplier = 1
XValues.Order = loAscending
YValues.DateTime = False
YValues.Name = 'Bar'
YValues.Multiplier = 1
YValues.Order = loNone
Identifier = 'Template: 工作部门'
Style = 61
end
object Series3: TBarSeries
Active = False
Marks.ArrowLength = 20
Marks.Visible = False
SeriesColor = clRed
Title = 'Template: 职工性别'
XValues.DateTime = False
XValues.Name = 'X'
XValues.Multiplier = 1
XValues.Order = loAscending
YValues.DateTime = False
YValues.Name = 'Bar'
YValues.Multiplier = 1
YValues.Order = loNone
Identifier = 'Template: 职工性别'
Style = 61
end
object Series4: TBarSeries
Active = False
Marks.ArrowLength = 20
Marks.Visible = False
SeriesColor = clRed
Title = 'Template: 技术职称'
XValues.DateTime = False
XValues.Name = 'X'
XValues.Multiplier = 1
XValues.Order = loAscending
YValues.DateTime = False
YValues.Name = 'Bar'
YValues.Multiplier = 1
YValues.Order = loNone
Identifier = 'Template: 技术职称'
Style = 61
end
object Series5: TBarSeries
Active = False
Marks.ArrowLength = 20
Marks.Visible = False
SeriesColor = clRed
Title = 'Template: 最高学历'
XValues.DateTime = False
XValues.Name = 'X'
XValues.Multiplier = 1
XValues.Order = loAscending
YValues.DateTime = False
YValues.Name = 'Bar'
YValues.Multiplier = 1
YValues.Order = loNone
Identifier = 'Template: 最高学历'
Style = 61
end
object Series6: TBarSeries
Active = False
Marks.ArrowLength = 20
Marks.Visible = False
SeriesColor = clRed
Title = 'Template: 所学专业'
XValues.DateTime = False
XValues.Name = 'X'
XValues.Multiplier = 1
XValues.Order = loAscending
YValues.DateTime = False
YValues.Name = 'Bar'
YValues.Multiplier = 1
YValues.Order = loNone
Identifier = 'Template: 所学专业'
Style = 61
end
object Series7: TBarSeries
Active = False
Marks.ArrowLength = 20
Marks.Visible = False
SeriesColor = clRed
XValues.DateTime = False
XValues.Name = 'X'
XValues.Multiplier = 1
XValues.Order = loAscending
YValues.DateTime = False
YValues.Name = 'Bar'
YValues.Multiplier = 1
YValues.Order = loNone
Identifier = '::职工性别+最高学历'
Style = 56
end
object Series2: TBarSeries
Active = False
Marks.ArrowLength = 20
Marks.Visible = False
SeriesColor = clRed
XValues.DateTime = False
XValues.Name = 'X'
XValues.Multiplier = 1
XValues.Order = loAscending
YValues.DateTime = False
YValues.Name = 'Bar'
YValues.Multiplier = 1
YValues.Order = loNone
Identifier = '::职工性别+最高学历'
Style = 56
end
object Series10: TBarSeries
Active = False
Marks.ArrowLength = 20
Marks.Visible = False
SeriesColor = clRed
XValues.DateTime = False
XValues.Name = 'X'
XValues.Multiplier = 1
XValues.Order = loAscending
YValues.DateTime = False
YValues.Name = 'Bar'
YValues.Multiplier = 1
YValues.Order = loNone
Identifier = '::职工性别+最高学历'
Style = 56
end
object Series8: TBarSeries
Active = False
Marks.ArrowLength = 20
Marks.Visible = False
SeriesColor = clRed
XValues.DateTime = False
XValues.Name = 'X'
XValues.Multiplier = 1
XValues.Order = loAscending
YValues.DateTime = False
YValues.Name = 'Bar'
YValues.Multiplier = 1
YValues.Order = loNone
Identifier = '::职工性别+最高学历'
Style = 56
end
object Series9: TBarSeries
Active = False
Marks.ArrowLength = 20
Marks.Visible = False
SeriesColor = clRed
XValues.DateTime = False
XValues.Name = 'X'
XValues.Multiplier = 1
XValues.Order = loAscending
YValues.DateTime = False
YValues.Name = 'Bar'
YValues.Multiplier = 1
YValues.Order = loNone
Identifier = '::职工性别+所学专业'
Style = 56
end
object Series12: TBarSeries
Active = False
Marks.ArrowLength = 20
Marks.Visible = False
SeriesColor = clRed
Title = '博士'
XValues.DateTime = False
XValues.Name = 'X'
XValues.Multiplier = 1
XValues.Order = loAscending
YValues.DateTime = False
YValues.Name = 'Bar'
YValues.Multiplier = 1
YValues.Order = loNone
Identifier = '博士'
Style = 40
end
object Series13: TBarSeries
Active = False
Marks.ArrowLength = 20
Marks.Visible = False
SeriesColor = clGreen
Title = '副教授'
XValues.DateTime = False
XValues.Name = 'X'
XValues.Multiplier = 1
XValues.Order = loAscending
YValues.DateTime = False
YValues.Name = 'Bar'
YValues.Multiplier = 1
YValues.Order = loNone
Identifier = '副教授'
Style = 40
end
object Series14: TBarSeries
Active = False
Marks.ArrowLength = 20
Marks.Visible = False
SeriesColor = clYellow
Title = '研究生'
XValues.DateTime = False
XValues.Name = 'X'
XValues.Multiplier = 1
XValues.Order = loAscending
YValues.DateTime = False
YValues.Name = 'Bar'
YValues.Multiplier = 1
YValues.Order = loNone
Identifier = '研究生'
Style = 40
end
end
object Button1: TButton
Left = 748
Top = 4
Width = 45
Height = 27
Caption = '关闭'
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -13
Font.Name = '宋体'
Font.Style = []
ParentFont = False
TabOrder = 2
OnClick = Button1Click
end
object DecisionCube1: TDecisionCube
DataSet = DecisionQuery1
DimensionMap = <
item
ActiveFlag = diAsNeeded
FieldType = ftString
Fieldname = '职工性别'
BaseName = '"zg.DB".职工性别'
Name = '职工性别'
DerivedFrom = -1
DimensionType = dimDimension
BinType = binNone
ValueCount = 2
Active = True
end
item
ActiveFlag = diAsNeeded
FieldType = ftString
Fieldname = '工作部门'
BaseName = '"zg.DB".工作部门'
Name = '工作部门'
DerivedFrom = -1
DimensionType = dimDimension
BinType = binNone
ValueCount = 4
Active = True
end
item
ActiveFlag = diAsNeeded
FieldType = ftString
Fieldname = '技术职称'
BaseName = '"zg.DB".技术职称'
Name = '技术职称'
DerivedFrom = -1
DimensionType = dimDimension
BinType = binNone
ValueCount = 3
Active = True
end
item
ActiveFlag = diAsNeeded
FieldType = ftString
Fieldname = '最高学历'
BaseName = '"zg.DB".最高学历'
Name = '最高学历'
DerivedFrom = -1
DimensionType = dimDimension
BinType = binNone
ValueCount = 3
Active = True
end
item
ActiveFlag = diAsNeeded
FieldType = ftString
Fieldname = '所学专业'
BaseName = '"zg.DB".所学专业'
Name = '所学专业'
DerivedFrom = -1
DimensionType = dimDimension
BinType = binNone
ValueCount = 4
Active = True
end
item
ActiveFlag = diAsNeeded
FieldType = ftInteger
Fieldname = 'COUNT OF 职工性别'
BaseName = '"zg.DB".职工性别'
Name = '按职工性别统计'
DerivedFrom = -1
DimensionType = dimCount
BinType = binNone
ValueCount = -1
Active = True
end
item
ActiveFlag = diAsNeeded
FieldType = ftInteger
Fieldname = 'COUNT OF 最高学历'
BaseName = '"zg.DB".最高学历'
Name = '按最高学历统计'
DerivedFrom = -1
DimensionType = dimCount
BinType = binNone
ValueCount = -1
Active = True
end
item
ActiveFlag = diAsNeeded
FieldType = ftInteger
Fieldname = 'COUNT OF 所学专业'
BaseName = '"zg.DB".所学专业'
Name = '按所学专业统计'
DerivedFrom = -1
DimensionType = dimCount
BinType = binNone
ValueCount = -1
Active = True
end
item
ActiveFlag = diAsNeeded
FieldType = ftInteger
Fieldname = 'COUNT OF 技术职称'
BaseName = '"zg.DB".技术职称'
Name = '按技术职称统计'
DerivedFrom = -1
DimensionType = dimCount
BinType = binNone
ValueCount = -1
Active = True
end>
ShowProgressDialog = True
MaxDimensions = 5
MaxSummaries = 10
MaxCells = 0
Left = 320
Top = 32
end
object DecisionQuery1: TDecisionQuery
DatabaseName = 'JFXT'
SQL.Strings = (
'SELECT 职工性别, 工作部门, 技术职称, 最高学历, 所学专业, COUNT( ' +
'职工性别 ), COUNT( 最高学历 ), COUNT( 所学专业 ), COUNT( 技术职' +
'称 )'
'FROM "zg.DB"'
'GROUP BY 职工性别, 工作部门, 技术职称, 最高学历, 所学专业')
Left = 368
Top = 96
end
object DecisionSource1: TDecisionSource
DecisionCube = DecisionCube1
ControlType = xtCheck
SparseRows = False
SparseCols = False
Left = 264
Top = 72
DimensionCount = 5
SummaryCount = 4
CurrentSummary = 3
SparseRows = False
SparseCols = False
DimensionInfo = (
2
0
1
0
0
2
-1
2
1
0
1
0
1
0
0
1
-1
2
1
0
1
-1
2
2
0)
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -