📄 mc_chpzgl.dfm
字号:
Hint = #29616#26377#24211#23384#21830#21697#20449#24687
DataSource = DataSource1
Options = [dgTitles, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgCancelOnExit]
TabOrder = 3
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -12
TitleFont.Name = #23435#20307
TitleFont.Style = []
Visible = False
OnKeyPress = DBGrid1KeyPress
Columns = <
item
Expanded = False
FieldName = #20179#24211#21517#31216
Width = 73
Visible = True
end
item
Expanded = False
FieldName = #21830#21697#32534#21495
Width = 51
Visible = True
end
item
Expanded = False
FieldName = #21830#21697#21517#31216
Width = 95
Visible = True
end
item
Expanded = False
FieldName = #21333#20301
Width = 27
Visible = True
end
item
Expanded = False
FieldName = #25968#37327
Width = 40
Visible = True
end
item
Expanded = False
FieldName = #21333#20215
Width = 41
Visible = True
end
item
Expanded = False
FieldName = #21830#21697#35828#26126
Width = 137
Visible = True
end>
end
object QuickRep1: TQuickRep
Left = 0
Top = 526
Width = 794
Height = 1123
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
DataSet = Query4
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
Functions.Strings = (
'PAGENUMBER'
'COLUMNNUMBER'
'REPORTTITLE')
Functions.DATA = (
'0'
'0'
#39#39)
OnPreview = QuickRep1Preview
Options = [FirstPageHeader, LastPageFooter]
Page.Columns = 1
Page.Orientation = poPortrait
Page.PaperSize = A4
Page.Values = (
100.000000000000000000
2970.000000000000000000
100.000000000000000000
2100.000000000000000000
100.000000000000000000
100.000000000000000000
0.000000000000000000)
PrinterSettings.Copies = 1
PrinterSettings.Duplex = False
PrinterSettings.FirstPage = 0
PrinterSettings.LastPage = 0
PrinterSettings.OutputBin = Auto
PrintIfEmpty = True
SnapToGrid = True
Units = MM
Zoom = 100
object PageHeaderBand1: TQRBand
Left = 38
Top = 38
Width = 718
Height = 75
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
AlignToBottom = False
Color = clWhite
ForceNewColumn = False
ForceNewPage = False
Size.Values = (
198.437500000000000000
1899.708333333333000000)
BandType = rbPageHeader
object QRLabel1: TQRLabel
Left = 1009
Top = 49
Width = 127
Height = 20
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
52.916666666666670000
2669.645833333333000000
129.645833333333300000
336.020833333333300000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = #20986#36135#20973#35777#21333#25454
Color = clWhite
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #26999#20307'_GB2312'
Font.Style = [fsBold]
ParentFont = False
Transparent = False
WordWrap = True
FontSize = 14
end
object QRShape1: TQRShape
Left = 5
Top = 33
Width = 706
Height = 2
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
5.291666666666670000
13.229166666666700000
87.312500000000000000
1867.958333333330000000)
Shape = qrsRectangle
end
object QRLabel3: TQRLabel
Left = 8
Top = 44
Width = 85
Height = 13
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
34.395833333333340000
21.166666666666670000
116.416666666666700000
224.895833333333300000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = #20986#36135#21333#25454#32534#21495#65306
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 9
end
object QRDBText1: TQRDBText
Left = 104
Top = 44
Width = 49
Height = 13
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
34.395833333333340000
275.166666666666700000
116.416666666666700000
129.645833333333300000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Color = clWhite
DataSet = Query4
DataField = #21333#25454#32534#21495
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
Transparent = False
WordWrap = True
FontSize = 9
end
object QRLabel4: TQRLabel
Left = 184
Top = 44
Width = 61
Height = 13
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
34.395833333333340000
486.833333333333400000
116.416666666666700000
161.395833333333300000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = #21333#25454#31867#22411#65306
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 9
end
object QRLabel5: TQRLabel
Left = 254
Top = 44
Width = 37
Height = 13
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
34.395833333333340000
672.041666666666800000
116.416666666666700000
97.895833333333320000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = #20986#36135#21333
Color = clWhite
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
Transparent = False
WordWrap = True
FontSize = 9
end
object QRLabel7: TQRLabel
Left = 544
Top = 44
Width = 49
Height = 13
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
34.395833333333340000
1439.333333333333000000
116.416666666666700000
129.645833333333300000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = #32463#25163#20154#65306
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 9
end
object QRDBText3: TQRDBText
Left = 600
Top = 44
Width = 37
Height = 13
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
34.395833333333340000
1587.500000000000000000
116.416666666666700000
97.895833333333320000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Color = clWhite
DataSet = Query4
DataField = #32463#21463#20154
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
Transparent = False
WordWrap = True
FontSize = 9
end
object QRShape3: TQRShape
Left = 5
Top = 66
Width = 706
Height = 2
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
5.291666666666670000
13.229166666666700000
174.625000000000000000
1867.958333333330000000)
Shape = qrsRectangle
end
end
object TitleBand1: TQRBand
Left = 38
Top = 113
Width = 718
Height = 32
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
AlignToBottom = False
Color = clWhite
ForceNewColumn = False
ForceNewPage = False
Size.Values = (
84.666666666666680000
1899.708333333333000000)
BandType = rbTitle
object QRShape2: TQRShape
Left = 10
Top = 4
Width = 697
Height = 28
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
74.083333333333300000
26.458333333333300000
10.583333333333300000
1844.145833333330000000)
Shape = qrsRectangle
end
object QRLabel8: TQRLabel
Left = 17
Top = 11
Width = 25
Height = 13
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
34.395833333333340000
44.979166666666670000
29.104166666666670000
66.145833333333340000)
Alignment = taLeftJustify
AlignToBand = False
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -