📄 unit2.dfm
字号:
object frmReport: TfrmReport
Left = 174
Top = 155
Width = 769
Height = 421
HorzScrollBar.Position = 35
Caption = 'frmReport'
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
Scaled = False
PixelsPerInch = 96
TextHeight = 13
object QuickRep1: TQuickRep
Left = -31
Top = 8
Width = 816
Height = 1056
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
DataSet = Table1
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = '宋体'
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 = Letter
Page.Values = (
100
2794
100
2159
100
100
0)
PrinterSettings.Copies = 1
PrinterSettings.Duplex = False
PrinterSettings.FirstPage = 0
PrinterSettings.LastPage = 0
PrinterSettings.OutputBin = Auto
PrintIfEmpty = True
SnapToGrid = True
Units = Pixels
Zoom = 100
object TitleBand1: TQRBand
Left = 38
Top = 38
Width = 740
Height = 40
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 = (
105.833333333333
1957.91666666667)
BandType = rbTitle
object QRLabel1: TQRLabel
Left = 293
Top = 16
Width = 153
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.9791666666667
775.229166666667
42.3333333333333
404.8125)
Alignment = taCenter
AlignToBand = True
AutoSize = True
AutoStretch = False
Caption = '打印Animals.dbf表格'
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 12
end
end
object ColumnHeaderBand1: TQRBand
Left = 38
Top = 78
Width = 740
Height = 40
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 = (
105.833333333333
1957.91666666667)
BandType = rbColumnHeader
object QRLabel2: TQRLabel
Left = 23
Top = 12
Width = 58
Height = 24
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
63.5
60.8541666666667
31.75
153.458333333333)
Alignment = taCenter
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = 'Name'
Color = clWhite
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = 'Georgia'
Font.Style = [fsBold]
ParentFont = False
Transparent = False
WordWrap = True
FontSize = 14
end
object QRLabel3: TQRLabel
Left = 178
Top = 12
Width = 41
Height = 24
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
63.5
470.958333333333
31.75
108.479166666667)
Alignment = taCenter
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = 'Size'
Color = clWhite
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = 'Georgia'
Font.Style = [fsBold]
ParentFont = False
Transparent = False
WordWrap = True
FontSize = 14
end
object QRLabel4: TQRLabel
Left = 315
Top = 12
Width = 72
Height = 24
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
63.5
833.4375
31.75
190.5)
Alignment = taCenter
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = 'Weight'
Color = clWhite
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = 'Georgia'
Font.Style = [fsBold]
ParentFont = False
Transparent = False
WordWrap = True
FontSize = 14
end
object QRLabel5: TQRLabel
Left = 466
Top = 12
Width = 47
Height = 24
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
63.5
1232.95833333333
31.75
124.354166666667)
Alignment = taCenter
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = 'Area'
Color = clWhite
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = 'Georgia'
Font.Style = [fsBold]
ParentFont = False
Transparent = False
WordWrap = True
FontSize = 14
end
object QRLabel6: TQRLabel
Left = 633
Top = 8
Width = 47
Height = 24
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
63.5
1674.8125
21.1666666666667
124.354166666667)
Alignment = taCenter
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = 'BMP'
Color = clWhite
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = 'Georgia'
Font.Style = [fsBold]
ParentFont = False
Transparent = False
WordWrap = True
FontSize = 14
end
end
object DetailBand1: TQRBand
Left = 38
Top = 118
Width = 740
Height = 51
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 = (
134.9375
1957.91666666667)
BandType = rbDetail
object QRDBText1: TQRDBText
Left = 36
Top = 26
Width = 33
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.9791666666667
95.25
68.7916666666667
87.3125)
Alignment = taCenter
AlignToBand = False
AutoSize = True
AutoStretch = False
Color = clWhite
DataSet = Table1
DataField = 'NAME'
Transparent = False
WordWrap = True
FontSize = 12
end
object QRDBText2: TQRDBText
Left = 182
Top = 26
Width = 33
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.9791666666667
481.541666666667
68.7916666666667
87.3125)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Color = clWhite
DataSet = Table1
DataField = 'SIZE'
Transparent = False
WordWrap = True
FontSize = 12
end
object QRDBText3: TQRDBText
Left = 327
Top = 26
Width = 49
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.9791666666667
865.1875
68.7916666666667
129.645833333333)
Alignment = taCenter
AlignToBand = False
AutoSize = True
AutoStretch = False
Color = clWhite
DataSet = Table1
DataField = 'WEIGHT'
Transparent = False
WordWrap = True
FontSize = 12
end
object QRDBText4: TQRDBText
Left = 473
Top = 26
Width = 33
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.9791666666667
1251.47916666667
68.7916666666667
87.3125)
Alignment = taCenter
AlignToBand = False
AutoSize = True
AutoStretch = False
Color = clWhite
DataSet = Table1
DataField = 'AREA'
Transparent = False
WordWrap = True
FontSize = 12
end
object QRDBImage1: TQRDBImage
Left = 604
Top = 5
Width = 105
Height = 41
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
108.479166666667
1598.08333333333
13.2291666666667
277.8125)
DataField = 'BMP'
DataSet = Table1
Stretch = True
end
end
end
object Table1: TTable
Active = True
DatabaseName = 'BCDEMOS'
TableName = 'animals.dbf'
Left = 52
Top = 28
object Table1NAME: TStringField
FieldName = 'NAME'
Size = 10
end
object Table1SIZE: TSmallintField
FieldName = 'SIZE'
end
object Table1WEIGHT: TSmallintField
FieldName = 'WEIGHT'
end
object Table1AREA: TStringField
FieldName = 'AREA'
end
object Table1BMP: TBlobField
FieldName = 'BMP'
BlobType = ftTypedBinary
Size = 1
end
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -