📄 unit_ca_consumestru.dfm
字号:
XValues.Multiplier = 1
XValues.Order = loAscending
XValues.ValueSource = 'CALCMONTH_D'
YValues.DateTime = False
YValues.Name = 'Y'
YValues.Multiplier = 1
YValues.Order = loNone
YValues.ValueSource = 'DATARATE'
end
object Series9: TLineSeries
Active = False
Marks.ArrowLength = 8
Marks.Visible = False
SeriesColor = clNavy
Title = 'GPRS费'
ValueFormat = '##0.##%'
Pointer.InflateMargins = True
Pointer.Style = psRectangle
Pointer.Visible = False
XValues.DateTime = True
XValues.Name = 'X'
XValues.Multiplier = 1
XValues.Order = loAscending
XValues.ValueSource = 'CALCMONTH_D'
YValues.DateTime = False
YValues.Name = 'Y'
YValues.Multiplier = 1
YValues.Order = loNone
YValues.ValueSource = 'GPRSRATE'
end
object Series10: TLineSeries
Active = False
Marks.ArrowLength = 8
Marks.Visible = False
SeriesColor = clMaroon
Title = '移动梦网'
ValueFormat = '##0.##%'
XLabelsSource = 'CALCMONTH'
Pointer.InflateMargins = True
Pointer.Style = psRectangle
Pointer.Visible = False
XValues.DateTime = True
XValues.Name = 'X'
XValues.Multiplier = 1
XValues.Order = loAscending
XValues.ValueSource = 'CALCMONTH_D'
YValues.DateTime = False
YValues.Name = 'Y'
YValues.Multiplier = 1
YValues.Order = loNone
YValues.ValueSource = 'INTERRATE'
end
object Series11: TLineSeries
Active = False
Marks.ArrowLength = 8
Marks.Visible = False
SeriesColor = clLime
Title = '业务费'
ValueFormat = '##0.##%'
Pointer.InflateMargins = True
Pointer.Style = psRectangle
Pointer.Visible = False
XValues.DateTime = True
XValues.Name = 'X'
XValues.Multiplier = 1
XValues.Order = loAscending
XValues.ValueSource = 'CALCMONTH_D'
YValues.DateTime = False
YValues.Name = 'Y'
YValues.Multiplier = 1
YValues.Order = loNone
YValues.ValueSource = 'OPEARTIONRATE'
end
object Series12: TLineSeries
Active = False
Marks.ArrowLength = 8
Marks.Visible = False
SeriesColor = clOlive
Title = '其他费用'
ValueFormat = '##0.##%'
Pointer.InflateMargins = True
Pointer.Style = psRectangle
Pointer.Visible = False
XValues.DateTime = True
XValues.Name = 'X'
XValues.Multiplier = 1
XValues.Order = loAscending
XValues.ValueSource = 'CALCMONTH_D'
YValues.DateTime = False
YValues.Name = 'Y'
YValues.Multiplier = 1
YValues.Order = loNone
YValues.ValueSource = 'OTHERRATE'
end
object Series13: TLineSeries
Active = False
Marks.ArrowLength = 8
Marks.Visible = False
SeriesColor = clPurple
Title = '优惠金额'
ValueFormat = '##0.##%'
Pointer.InflateMargins = True
Pointer.Style = psRectangle
Pointer.Visible = False
XValues.DateTime = True
XValues.Name = 'X'
XValues.Multiplier = 1
XValues.Order = loAscending
XValues.ValueSource = 'CALCMONTH_D'
YValues.DateTime = False
YValues.Name = 'Y'
YValues.Multiplier = 1
YValues.Order = loNone
YValues.ValueSource = 'FAVOURRATE'
end
object Series15: TBarSeries
Active = False
Marks.ArrowLength = 8
Marks.Visible = False
SeriesColor = clRed
Title = '市话费'
ValueFormat = '##0.##%'
XLabelsSource = 'CALCMONTH'
XValues.DateTime = True
XValues.Name = 'X'
XValues.Multiplier = 1
XValues.Order = loAscending
XValues.ValueSource = 'CALCMONTH_D'
YValues.DateTime = False
YValues.Name = 'Bar'
YValues.Multiplier = 1
YValues.Order = loNone
YValues.ValueSource = 'CITYRATE'
end
object Series16: TBarSeries
Active = False
Marks.ArrowLength = 8
Marks.Visible = False
SeriesColor = clGreen
Title = '长途费'
ValueFormat = '##0.##%'
XLabelsSource = 'CALCMONTH'
XValues.DateTime = True
XValues.Name = 'X'
XValues.Multiplier = 1
XValues.Order = loAscending
XValues.ValueSource = 'CALCMONTH_D'
YValues.DateTime = False
YValues.Name = 'Bar'
YValues.Multiplier = 1
YValues.Order = loNone
YValues.ValueSource = 'LONGRATE'
end
object Series30: TBarSeries
Active = False
Marks.ArrowLength = 8
Marks.Visible = False
SeriesColor = clGreen
Title = '漫游费'
ValueFormat = '##0.##%'
XLabelsSource = 'CALCMONTH'
XValues.DateTime = True
XValues.Name = 'X'
XValues.Multiplier = 1
XValues.Order = loAscending
XValues.ValueSource = 'CALCMONTH_D'
YValues.DateTime = False
YValues.Name = 'Bar'
YValues.Multiplier = 1
YValues.Order = loNone
YValues.ValueSource = 'LONGRATE'
end
object Series17: TBarSeries
Active = False
Marks.ArrowLength = 8
Marks.Visible = False
SeriesColor = clYellow
Title = '省内长途费'
ValueFormat = '##0.##%'
XValues.DateTime = True
XValues.Name = 'X'
XValues.Multiplier = 1
XValues.Order = loAscending
XValues.ValueSource = 'CALCMONTH_D'
YValues.DateTime = False
YValues.Name = 'Bar'
YValues.Multiplier = 1
YValues.Order = loNone
YValues.ValueSource = 'PILONGRATE'
end
object Series18: TBarSeries
Active = False
Marks.ArrowLength = 8
Marks.Visible = False
SeriesColor = clBlue
Title = '省内漫游费'
ValueFormat = '##0.##%'
XValues.DateTime = True
XValues.Name = 'X'
XValues.Multiplier = 1
XValues.Order = loAscending
XValues.ValueSource = 'CALCMONTH_D'
YValues.DateTime = False
YValues.Name = 'Bar'
YValues.Multiplier = 1
YValues.Order = loNone
YValues.ValueSource = 'PIRAMBLERATE'
end
object Series19: TBarSeries
Active = False
Marks.ArrowLength = 8
Marks.Visible = False
SeriesColor = clSilver
Title = '省际长途费'
ValueFormat = '##0.##%'
XValues.DateTime = True
XValues.Name = 'X'
XValues.Multiplier = 1
XValues.Order = loAscending
XValues.ValueSource = 'CALCMONTH_D'
YValues.DateTime = False
YValues.Name = 'Bar'
YValues.Multiplier = 1
YValues.Order = loNone
YValues.ValueSource = 'POLONGRATE'
end
object Series20: TBarSeries
Active = False
Marks.ArrowLength = 8
Marks.Visible = False
SeriesColor = clGray
Title = '省际漫游费'
ValueFormat = '##0.##%'
XValues.DateTime = True
XValues.Name = 'X'
XValues.Multiplier = 1
XValues.Order = loAscending
XValues.ValueSource = 'CALCMONTH_D'
YValues.DateTime = False
YValues.Name = 'Bar'
YValues.Multiplier = 1
YValues.Order = loNone
YValues.ValueSource = 'PORAMBLERATE'
end
object Series21: TBarSeries
Active = False
Marks.ArrowLength = 8
Marks.Visible = False
SeriesColor = clWhite
Title = '国际长途费'
ValueFormat = '##0.##%'
XValues.DateTime = True
XValues.Name = 'X'
XValues.Multiplier = 1
XValues.Order = loAscending
XValues.ValueSource = 'CALCMONTH_D'
YValues.DateTime = False
YValues.Name = 'Bar'
YValues.Multiplier = 1
YValues.Order = loNone
YValues.ValueSource = 'INTERLONGRATE'
end
object Series22: TBarSeries
Active = False
Marks.ArrowLength = 8
Marks.Visible = False
SeriesColor = clFuchsia
Title = '国际漫游费'
ValueFormat = '##0.##%'
XValues.DateTime = True
XValues.Name = 'X'
XValues.Multiplier = 1
XValues.Order = loAscending
XValues.ValueSource = 'CALCMONTH_D'
YValues.DateTime = False
YValues.Name = 'Bar'
YValues.Multiplier = 1
YValues.Order = loNone
YValues.ValueSource = 'INTERRAMBLERATE'
end
object Series23: TBarSeries
Active = False
Marks.ArrowLength = 8
Marks.Visible = False
SeriesColor = clTeal
Title = '数据费'
ValueFormat = '##0.##%'
XValues.DateTime = True
XValues.Name = 'X'
XValues.Multiplier = 1
XValues.Order = loAscending
XValues.ValueSource = 'CALCMONTH_D'
YValues.DateTime = False
YValues.Name = 'Bar'
YValues.Multiplier = 1
YValues.Order = loNone
YValues.ValueSource = 'DATARATE'
end
object Series24: TBarSeries
Active = False
Marks.ArrowLength = 8
Marks.Visible = False
SeriesColor = clNavy
Title = 'GPRS费'
ValueFormat = '##0.##%'
XValues.DateTime = True
XValues.Name = 'X'
XValues.Multiplier = 1
XValues.Order = loAscending
XValues.ValueSource = 'CALCMONTH_D'
YValues.DateTime = False
YValues.Name = 'Bar'
YValues.Multiplier = 1
YValues.Order = loNone
YValues.ValueSource = 'GPRSRATE'
end
object Series25: TBarSeries
Active = False
Marks.ArrowLength = 8
Marks.Visible = False
SeriesColor = clMaroon
Title = '移动梦网'
ValueFormat = '##0.##%'
XValues.DateTime = True
XValues.Name = 'X'
XValues.Multiplier = 1
XValues.Order = loAscending
XValues.ValueSource = 'CALCMONTH_D'
YValues.DateTime = False
YValues.Name = 'Bar'
YValues.Multiplier = 1
YValues.Order = loNone
YValues.ValueSource = 'INTERRATE'
end
object Series26: TBarSeries
Active = False
Marks.ArrowLength = 8
Marks.Visible = False
SeriesColor = clLime
Title = '业务费'
ValueFormat = '##0.##%'
XValues.DateTime = True
XValues.Name = 'X'
XValues.Multiplier = 1
XValues.Order = loAscending
XValues.ValueSource = 'CALCMONTH_D'
YValues.DateTime = False
YValues.Name = 'Bar'
YValues.Multiplier = 1
YValues.Order = loNone
YValues.ValueSource = 'OPEARTIONRATE'
end
object Series27: TBarSeries
Active = False
Marks.ArrowLength = 8
Marks.Visible = False
SeriesColor = clOlive
Title = '其他费用'
ValueFormat = '##0.##%'
XValues.DateTime = True
XValues.Name = 'X'
XValues.Multiplier = 1
XValues.Order = loAscending
XValues.ValueSource = 'CALCMONTH_D'
YValues.DateTime = False
YValues.Name = 'Bar'
YValues.Multiplier = 1
YValues.Order = loNone
YValues.ValueSource = 'OTHERRATE'
end
object Series28: TBarSeries
Active = False
Marks.ArrowLength = 8
Marks.Visible = False
SeriesColor = clPurple
Title = '优惠金额'
ValueFormat = '##0.##%'
XValues.DateTime = True
XValues.Name = 'X'
XValues.Multiplier = 1
XValues.Order = loAscending
XValues.ValueSource = 'CALCMONTH_D'
YValues.DateTime = False
YValues.Name = 'Bar'
YValues.Multiplier = 1
YValues.Order = loNone
YValues.ValueSource = 'FAVOURRATE'
end
end
end
object TabSheet2: TTabSheet
Caption = '文字分析'
ImageIndex = 1
object DBGrid1: TDBGrid
Left = 0
Top = 0
Width = 459
Height = 381
Align = alClient
DataSource = ds_analyze
TabOrder = 0
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -15
TitleFont.Name = '宋体'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'CALCMONTH'
Title.Caption = '计费月'
Visible = True
end
item
Expanded = False
FieldName = 'TOTAL'
Title.Caption = '总缴费金额'
Visible = True
end
item
Expanded = False
FieldName = 'FAVOURFEE'
Title.Caption = '本地优惠金额'
Visible = True
end
item
Expanded = False
FieldName = 'FAVOURRATE'
Title.Caption = '本地优惠比率'
Visible = True
end
item
Expanded = False
FieldName = 'COPEFEE'
Title.Caption = '应缴话费'
Visible = True
end
item
Expanded = False
FieldName = 'BASICFEE'
Title.Caption = '基本费'
Visible = True
end
item
Expanded = False
FieldName = 'BASICRATE'
Title.Caption = '基本费比率'
Visible = True
end
item
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -