📄 xiaoshoumx.dfm
字号:
object gheader: TQRGroup
Left = 38
Top = 105
Width = 718
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
1899.70833333333)
Expression = 'ds_xiaoshou_lb.dtd'
FooterBand = gfooter
Master = rep
ReprintOnNewPage = False
object QRLabel6: TQRLabel
Left = 120
Top = 16
Width = 101
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.9791666666667
317.5
42.3333333333333
267.229166666667)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = #26085' '#26399
Color = clWhite
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #40657#20307
Font.Style = [fsBold]
ParentFont = False
Transparent = False
WordWrap = True
FontSize = 10
end
object QRExpr2: TQRExpr
Left = 248
Top = 16
Width = 145
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.9791666666667
656.166666666667
42.3333333333333
383.645833333333)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #40657#20307
Font.Style = [fsBold]
Color = clWhite
ParentFont = False
ResetAfterPrint = False
Transparent = False
WordWrap = True
Expression = 'ds_xiaoshou_lb.dtd'
FontSize = 10
end
end
object gfooter: TQRBand
Left = 38
Top = 162
Width = 718
Height = 35
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = True
Frame.DrawLeft = False
Frame.DrawRight = False
AlignToBottom = False
Color = clWhite
ForceNewColumn = False
ForceNewPage = False
Size.Values = (
92.6041666666667
1899.70833333333)
BandType = rbGroupFooter
object QRLabel7: TQRLabel
Left = 120
Top = 8
Width = 73
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.9791666666667
317.5
21.1666666666667
193.145833333333)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = False
AutoStretch = False
Caption = #24403#26085#21512#35745#25968
Color = clWhite
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #40657#20307
Font.Style = [fsBold]
ParentFont = False
Transparent = False
WordWrap = True
FontSize = 10
end
object sumjine: TQRExpr
Left = 488
Top = 8
Width = 65
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.9791666666667
1291.16666666667
21.1666666666667
171.979166666667)
Alignment = taRightJustify
AlignToBand = False
AutoSize = False
AutoStretch = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
Color = clWhite
ParentFont = False
ResetAfterPrint = True
Transparent = False
WordWrap = True
Expression = 'SUM(ds_xiaoshou_lb.jine)'
Mask = '.00'
FontSize = 10
end
object sumshuliang: TQRExpr
Left = 248
Top = 8
Width = 41
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.9791666666667
656.166666666667
21.1666666666667
108.479166666667)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = False
AutoStretch = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -13
Font.Name = #40657#20307
Font.Style = [fsBold]
Color = clWhite
ParentFont = False
ResetAfterPrint = True
Transparent = False
WordWrap = True
Expression = 'SUM(ds_xiaoshou_lb.shuliang)'
FontSize = 10
end
end
object QRBand4: TQRBand
Left = 38
Top = 197
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.6666666666667
1899.70833333333)
BandType = rbPageFooter
object QRSysData1: TQRSysData
Left = 304
Top = 16
Width = 25
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.9791666666667
804.333333333333
42.3333333333333
66.1458333333333)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = False
Color = clWhite
Data = qrsPageNumber
Transparent = False
FontSize = 10
end
object QRLabel8: TQRLabel
Left = 328
Top = 16
Width = 18
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.9791666666667
867.833333333334
42.3333333333333
47.625)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = #39029
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 10
end
object QRLabel9: TQRLabel
Left = 280
Top = 16
Width = 18
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.9791666666667
740.833333333333
42.3333333333333
47.625)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = #31532
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 10
end
end
end
object Button1: TButton
Left = 264
Top = 8
Width = 75
Height = 25
Caption = #29983#25104#25253#34920
TabOrder = 1
OnClick = Button1Click
end
object Button2: TButton
Left = 350
Top = 8
Width = 75
Height = 25
Caption = #26085#26399#36716#25442
TabOrder = 2
OnClick = Button2Click
end
object dt1: TDateTimePicker
Left = 24
Top = 8
Width = 89
Height = 21
CalAlignment = dtaLeft
Date = 36526.4669754282
Time = 36526.4669754282
DateFormat = dfShort
DateMode = dmComboBox
Kind = dtkDate
ParseInput = False
TabOrder = 3
end
object dt2: TDateTimePicker
Left = 152
Top = 8
Width = 97
Height = 21
CalAlignment = dtaLeft
Date = 38055.4672920833
Time = 38055.4672920833
DateFormat = dfShort
DateMode = dmComboBox
Kind = dtkDate
ParseInput = False
TabOrder = 4
end
object ds_xiaoshou_lb: TADODataSet
Connection = dm_data.ado_conn
CursorType = ctStatic
CommandText =
'select xiaoshou.*,name.name from xiaoshou,name where dt>=:dt1 an' +
'd dt<=:dt2 and xiaoshou.code like :code and xiaoshou.code=name.c' +
'ode order by dtd'
Parameters = <
item
Name = 'dt1'
Attributes = [paNullable]
DataType = ftFixedChar
NumericScale = 255
Precision = 255
Size = 510
Value = '2000-01-01 0:0:0'
end
item
Name = 'dt2'
Attributes = [paNullable]
DataType = ftFixedChar
NumericScale = 255
Precision = 255
Size = 510
Value = '2008-01-01 0:0:0'
end
item
Name = 'code'
Attributes = [paNullable]
DataType = ftFixedChar
NumericScale = 255
Precision = 255
Size = 510
Value = '%'
end>
Left = 12
Top = 35
object ds_xiaoshou_lbid: TAutoIncField
FieldName = 'id'
ReadOnly = True
end
object ds_xiaoshou_lbdanjuhao: TIntegerField
FieldName = 'danjuhao'
end
object ds_xiaoshou_lbcode: TWideStringField
FieldName = 'code'
Size = 15
end
object ds_xiaoshou_lbshuliang: TIntegerField
FieldName = 'shuliang'
end
object ds_xiaoshou_lbshoujia: TBCDField
FieldName = 'shoujia'
Precision = 19
end
object ds_xiaoshou_lbjine: TBCDField
FieldName = 'jine'
Precision = 19
end
object ds_xiaoshou_lbdt: TDateTimeField
FieldName = 'dt'
end
object ds_xiaoshou_lbname: TWideStringField
FieldName = 'name'
Size = 30
end
object ds_xiaoshou_lbdtd: TDateTimeField
FieldName = 'dtd'
end
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -