📄 xspj.dfm
字号:
FieldName = 'sj'
Title.Caption = '税金'
Visible = True
end
item
Expanded = False
FieldName = 'lr'
Title.Caption = '利润'
Visible = True
end
item
Expanded = False
FieldName = 'cb'
Title.Caption = '成本'
Visible = True
end
item
Expanded = False
FieldName = 'ph'
Title.Caption = '批号'
Visible = True
end
item
Expanded = False
FieldName = 'pzwh'
Title.Caption = '批准文号'
Visible = True
end
item
Expanded = False
FieldName = 'ck_mc'
Title.Caption = '仓库名称'
Visible = True
end
item
Expanded = False
FieldName = 'kh_mc'
Title.Caption = '客户名称'
Visible = True
end
item
Expanded = False
FieldName = 'xsrq'
Title.Caption = '销售日期'
Visible = True
end
item
Expanded = False
FieldName = 'bm_mc'
Title.Caption = '部门名称'
Visible = True
end
item
Expanded = False
FieldName = 'ywy_xm'
Title.Caption = '业务员姓名'
Visible = True
end>
end
object BitBtn1: TBitBtn
Left = 600
Top = 40
Width = 75
Height = 25
Caption = '打印'
TabOrder = 1
OnClick = BitBtn1Click
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
00033FFFFFFFFFFFFFFF0888888888888880777777777777777F088888888888
8880777777777777777F0000000000000000FFFFFFFFFFFFFFFF0F8F8F8F8F8F
8F80777777777777777F08F8F8F8F8F8F9F0777777777777777F0F8F8F8F8F8F
8F807777777777777F7F0000000000000000777777777777777F3330FFFFFFFF
03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF
03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0
33333337F3FF7F3733333330F08F0F0333333337F7737F7333333330FFFF0033
33333337FFFF7733333333300000033333333337777773333333}
NumGlyphs = 2
end
object BitBtn2: TBitBtn
Left = 688
Top = 40
Width = 75
Height = 25
Caption = '&X关闭'
TabOrder = 2
OnClick = BitBtn2Click
Glyph.Data = {
DE010000424DDE01000000000000760000002800000024000000120000000100
0400000000006801000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00388888888877
F7F787F8888888888333333F00004444400888FFF444448888888888F333FF8F
000033334D5007FFF4333388888888883338888F0000333345D50FFFF4333333
338F888F3338F33F000033334D5D0FFFF43333333388788F3338F33F00003333
45D50FEFE4333333338F878F3338F33F000033334D5D0FFFF43333333388788F
3338F33F0000333345D50FEFE4333333338F878F3338F33F000033334D5D0FFF
F43333333388788F3338F33F0000333345D50FEFE4333333338F878F3338F33F
000033334D5D0EFEF43333333388788F3338F33F0000333345D50FEFE4333333
338F878F3338F33F000033334D5D0EFEF43333333388788F3338F33F00003333
4444444444333333338F8F8FFFF8F33F00003333333333333333333333888888
8888333F00003333330000003333333333333FFFFFF3333F00003333330AAAA0
333333333333888888F3333F00003333330000003333333333338FFFF8F3333F
0000}
NumGlyphs = 2
end
object Edit_ckdh: TEdit
Left = 136
Top = 40
Width = 129
Height = 20
TabOrder = 3
end
object Panel2: TPanel
Left = 5
Top = 40
Width = 124
Height = 23
Caption = '出库单号'
TabOrder = 5
end
object wpbm_Edit: TEdit
Left = 368
Top = 40
Width = 97
Height = 20
TabOrder = 7
OnChange = wpbm_EditChange
end
object CheckBox1: TCheckBox
Left = 480
Top = 42
Width = 97
Height = 17
Caption = '按单号打印'
Checked = True
State = cbChecked
TabOrder = 8
end
object Query_xs: TQuery
OnCalcFields = Query_xsCalcFields
DatabaseName = 'yygl'
RequestLive = True
Left = 288
Top = 144
object Query_xsxs_bh: TStringField
FieldName = 'xs_bh'
Origin = 'YYGL.xsxxb.xs_bh'
Size = 22
end
object Query_xswp_bm: TStringField
FieldName = 'wp_bm'
Origin = 'YYGL.xsxxb.wp_bm'
Size = 5
end
object Query_xskh_mc: TStringField
FieldName = 'kh_mc'
Origin = 'YYGL.xsxxb.kh_mc'
end
object Query_xspm: TStringField
FieldName = 'pm'
Origin = 'YYGL.xsxxb.pm'
end
object Query_xsdw: TStringField
FieldName = 'dw'
Origin = 'YYGL.xsxxb.dw'
Size = 4
end
object Query_xsgg: TStringField
FieldName = 'gg'
Origin = 'YYGL.xsxxb.gg'
Size = 10
end
object Query_xsjj: TFloatField
FieldName = 'jj'
Origin = 'YYGL.xsxxb.jj'
end
object Query_xsdj: TFloatField
FieldName = 'dj'
Origin = 'YYGL.xsxxb.dj'
end
object Query_xssl: TFloatField
FieldName = 'sl'
Origin = 'YYGL.xsxxb.sl'
end
object Query_xsje: TFloatField
FieldName = 'je'
Origin = 'YYGL.xsxxb.je'
end
object Query_xsfp_ph: TStringField
FieldName = 'fp_ph'
Origin = 'YYGL.xsxxb.fp_ph'
Size = 14
end
object Query_xscb: TFloatField
FieldKind = fkCalculated
FieldName = 'cb'
DisplayFormat = '0.0000'
Calculated = True
end
object Query_xssj: TFloatField
FieldKind = fkCalculated
FieldName = 'sj'
DisplayFormat = '0.0000'
Calculated = True
end
object Query_xsml: TFloatField
FieldKind = fkCalculated
FieldName = 'ml'
Calculated = True
end
object Query_xslr: TFloatField
FieldKind = fkCalculated
FieldName = 'lr'
DisplayFormat = '0.0000'
Calculated = True
end
object Query_xsph: TStringField
FieldName = 'ph'
Origin = 'YYGL.xsxxb.ph'
end
object Query_xsxsrq: TDateTimeField
FieldName = 'xsrq'
Origin = 'YYGL.xsxxb.xsrq'
DisplayFormat = 'yyyy-mm-dd'
end
object Query_xsck_bh: TStringField
FieldName = 'ck_bh'
Origin = 'YYGL.xsxxb.ck_bh'
Size = 1
end
object Query_xsck_mc: TStringField
FieldKind = fkLookup
FieldName = 'ck_mc'
LookupDataSet = Query_ckxx
LookupKeyFields = 'ck_bh'
LookupResultField = 'ck_mc'
KeyFields = 'ck_bh'
Size = 10
Lookup = True
end
object Query_xsbm_mc: TStringField
FieldName = 'bm_mc'
Origin = 'YYGL.xsxxb.bm_mc'
Size = 10
end
object Query_xsywy_xm: TStringField
FieldName = 'ywy_xm'
Origin = 'YYGL.xsxxb.ywy_xm'
Size = 8
end
object Query_xscd: TStringField
FieldName = 'cd'
Origin = 'YYGL.xsxxb.cd'
end
object Query_xssb: TStringField
FieldName = 'sb'
Origin = 'YYGL.xsxxb.sb'
Size = 10
end
object Query_xspzwh: TStringField
FieldName = 'pzwh'
Origin = 'YYGL.xsxxb.pzwh'
Size = 30
end
object Query_xsyxq: TFloatField
FieldName = 'yxq'
Origin = 'YYGL.xsxxb.yxq'
end
end
object DataSource_xs: TDataSource
DataSet = Query_xs
Left = 288
Top = 184
end
object Query_ckd: TQuery
DatabaseName = 'yygl'
RequestLive = True
Left = 328
Top = 144
end
object Query_ckxx: TQuery
DatabaseName = 'yygl'
RequestLive = True
Left = 248
Top = 144
end
object Database: TDatabase
AliasName = 'yygl'
Connected = True
DatabaseName = 'yygl'
LoginPrompt = False
Params.Strings = (
'user name='#39#39
'password='#39#39)
SessionName = 'Default'
TransIsolation = tiRepeatableRead
Left = 296
Top = 112
end
object Query_tmp: TQuery
Left = 376
Top = 152
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -