📄 main_xjgl_xjtjform.dfm
字号:
object main_xjgl_xjtj: Tmain_xjgl_xjtj
Left = 258
Top = 334
BorderIcons = []
BorderStyle = bsDialog
Caption = #23398#31821#32479#35745
ClientHeight = 267
ClientWidth = 624
Color = clMenu
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object Bevel1: TBevel
Left = 0
Top = 0
Width = 624
Height = 267
Align = alClient
Style = bsRaised
end
object DecisionGrid1: TDecisionGrid
Left = 7
Top = 43
Width = 610
Height = 190
Options = [cgGridLines]
DefaultColWidth = 100
DefaultRowHeight = 20
CaptionColor = clActiveCaption
CaptionFont.Charset = GB2312_CHARSET
CaptionFont.Color = clCaptionText
CaptionFont.Height = -13
CaptionFont.Name = #23435#20307
CaptionFont.Style = [fsBold]
DataColor = clInfoBk
DataSumColor = clTeal
DataFont.Charset = DEFAULT_CHARSET
DataFont.Color = clWindowText
DataFont.Height = -11
DataFont.Name = 'MS Sans Serif'
DataFont.Style = []
LabelFont.Charset = GB2312_CHARSET
LabelFont.Color = clWindowText
LabelFont.Height = -13
LabelFont.Name = #23435#20307
LabelFont.Style = [fsBold, fsItalic]
LabelColor = clBtnFace
LabelSumColor = clTeal
DecisionSource = DecisionSource1
Dimensions = <
item
FieldName = #25152#22312#31995#21517
Color = clNone
Alignment = taCenter
Subtotals = True
end
item
FieldName = #25152#22312#24180#32423
Color = clNone
Alignment = taCenter
Subtotals = True
end
item
FieldName = #25152#22312#29677#32423
Color = clNone
Alignment = taCenter
Subtotals = True
end
item
FieldName = #24615#21035
Color = clNone
Alignment = taCenter
Subtotals = True
end
item
FieldName = #27665#26063
Color = clNone
Alignment = taCenter
Subtotals = True
end
item
FieldName = #25919#27835#38754#35980
Color = clNone
Alignment = taCenter
Subtotals = True
end
item
FieldName = #25152#23398#19987#19994
Color = clNone
Alignment = taCenter
Subtotals = True
end
item
FieldName = #25353#24615#21035#32479#35745
Color = clNone
Alignment = taCenter
Subtotals = True
end
item
FieldName = #25353#27665#26063#32479#35745
Color = clNone
Alignment = taCenter
Subtotals = True
end
item
FieldName = #25353#25919#27835#38754#35980#32479#35745
Color = clNone
Alignment = taCenter
Subtotals = True
end
item
FieldName = #25353' '#25152#23398#19987#19994#32479#35745
Color = clNone
Alignment = taCenter
Subtotals = True
end>
Totals = True
ShowCubeEditor = False
Color = clMenu
GridLineWidth = 1
GridLineColor = clWindowText
TabOrder = 0
end
object DecisionPivot1: TDecisionPivot
Left = 9
Top = 5
Width = 608
Height = 28
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 = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = [fsBold]
Color = clMenu
Ctl3D = True
ParentCtl3D = False
ParentFont = False
TabOrder = 1
end
object BitBtn1: TBitBtn
Left = 528
Top = 232
Width = 75
Height = 25
Caption = '&'#20851#38381
TabOrder = 2
OnClick = BitBtn1Click
Kind = bkClose
end
object DecisionCube1: TDecisionCube
DataSet = DecisionQuery1
DimensionMap = <
item
ActiveFlag = diAsNeeded
FieldType = ftString
Fieldname = #25152#22312#31995#21517
BaseName = '"xj.DB".'#25152#22312#31995#21517
Name = #25152#22312#31995#21517
DerivedFrom = -1
DimensionType = dimDimension
BinType = binNone
ValueCount = 3
Active = True
end
item
ActiveFlag = diAsNeeded
FieldType = ftString
Fieldname = #25152#22312#24180#32423
BaseName = '"xj.DB".'#25152#22312#24180#32423
Name = #25152#22312#24180#32423
DerivedFrom = -1
DimensionType = dimDimension
BinType = binNone
ValueCount = 2
Active = True
end
item
ActiveFlag = diAsNeeded
FieldType = ftString
Fieldname = #25152#22312#29677#32423
BaseName = '"xj.DB".'#25152#22312#29677#32423
Name = #25152#22312#29677#32423
DerivedFrom = -1
DimensionType = dimDimension
BinType = binNone
ValueCount = 4
Active = True
end
item
ActiveFlag = diAsNeeded
FieldType = ftString
Fieldname = #24615#21035
BaseName = '"xj.DB".'#24615#21035
Name = #24615#21035
DerivedFrom = -1
DimensionType = dimDimension
BinType = binNone
ValueCount = 2
Active = True
end
item
ActiveFlag = diAsNeeded
FieldType = ftString
Fieldname = #27665#26063
BaseName = '"xj.DB".'#27665#26063
Name = #27665#26063
DerivedFrom = -1
DimensionType = dimDimension
BinType = binNone
ValueCount = 2
Active = True
end
item
ActiveFlag = diAsNeeded
FieldType = ftString
Fieldname = #25919#27835#38754#35980
BaseName = '"xj.DB".'#25919#27835#38754#35980
Name = #25919#27835#38754#35980
DerivedFrom = -1
DimensionType = dimDimension
BinType = binNone
ValueCount = 3
Active = True
end
item
ActiveFlag = diAsNeeded
FieldType = ftString
Fieldname = #25152#23398#19987#19994
BaseName = '"xj.DB".'#25152#23398#19987#19994
Name = #25152#23398#19987#19994
DerivedFrom = -1
DimensionType = dimDimension
BinType = binNone
ValueCount = 3
Active = True
end
item
ActiveFlag = diAsNeeded
FieldType = ftInteger
Fieldname = 'COUNT OF '#24615#21035
BaseName = '"xj.DB".'#24615#21035
Name = #25353#24615#21035#32479#35745
DerivedFrom = -1
DimensionType = dimCount
BinType = binNone
ValueCount = -1
Active = True
end
item
ActiveFlag = diAsNeeded
FieldType = ftInteger
Fieldname = 'COUNT OF '#27665#26063
BaseName = '"xj.DB".'#27665#26063
Name = #25353#27665#26063#32479#35745
DerivedFrom = -1
DimensionType = dimCount
BinType = binNone
ValueCount = -1
Active = True
end
item
ActiveFlag = diAsNeeded
FieldType = ftInteger
Fieldname = 'COUNT OF '#25919#27835#38754#35980
BaseName = '"xj.DB".'#25919#27835#38754#35980
Name = #25353#25919#27835#38754#35980#32479#35745
DerivedFrom = -1
DimensionType = dimCount
BinType = binNone
ValueCount = -1
Active = True
end
item
ActiveFlag = diAsNeeded
FieldType = ftInteger
Fieldname = 'COUNT OF '#25152#23398#19987#19994
BaseName = '"xj.DB".'#25152#23398#19987#19994
Name = #25353' '#25152#23398#19987#19994#32479#35745
DerivedFrom = -1
DimensionType = dimCount
BinType = binNone
ValueCount = -1
Active = True
end>
ShowProgressDialog = True
MaxDimensions = 7
MaxSummaries = 10
MaxCells = 0
Left = 440
Top = 64
end
object DecisionQuery1: TDecisionQuery
DatabaseName = 'JFXT'
SQL.Strings = (
'SELECT '#25152#22312#31995#21517', '#25152#22312#24180#32423', '#25152#22312#29677#32423', '#24615#21035', '#27665#26063', '#25919#27835#38754#35980', '#25152#23398#19987#19994', COUNT( '#24615#21035' ), COUNT(' +
' '#27665#26063' ), COUNT( '#25919#27835#38754#35980' ), COUNT( '#25152#23398#19987#19994' )'
'FROM "xj.DB"'
'GROUP BY '#25152#22312#31995#21517', '#25152#22312#24180#32423', '#25152#22312#29677#32423', '#24615#21035', '#27665#26063', '#25919#27835#38754#35980', '#25152#23398#19987#19994)
Left = 504
Top = 72
end
object DecisionSource1: TDecisionSource
DecisionCube = DecisionCube1
ControlType = xtCheck
SparseRows = False
SparseCols = False
Left = 448
Top = 160
DimensionCount = 7
SummaryCount = 4
CurrentSummary = 0
SparseRows = False
SparseCols = False
DimensionInfo = (
1
0
1
0
0
1
-1
2
1
-1
2
-1
2
0
0
1
-1
2
2
0
1
-1
2
3
0
1
-1
2
4
-1
1
-1
2
5
-1)
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -