📄 uaccept.dfm
字号:
object frmAccept: TfrmAccept
Left = 78
Top = 135
Width = 691
Height = 427
Caption = '业务管理'
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = '宋体'
Font.Style = []
FormStyle = fsMDIChild
OldCreateOrder = False
Position = poMainFormCenter
Visible = True
WindowState = wsMaximized
OnClose = FormClose
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 14
object Panel1: TPanel
Left = 0
Top = 0
Width = 683
Height = 35
Align = alTop
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
TabOrder = 0
object Button1: TButton
Left = 11
Top = 5
Width = 72
Height = 26
Caption = '打印预览'
TabOrder = 0
OnClick = Button1Click
end
object Button2: TButton
Left = 84
Top = 5
Width = 72
Height = 26
Caption = '打 印'
TabOrder = 1
OnClick = Button2Click
end
object Button3: TButton
Left = 157
Top = 5
Width = 72
Height = 26
Caption = '关 闭'
TabOrder = 2
OnClick = Button3Click
end
end
object PageControl1: TPageControl
Left = 0
Top = 35
Width = 683
Height = 365
ActivePage = TabSheet2
Align = alClient
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = '宋体'
Font.Style = []
ParentFont = False
TabOrder = 1
OnChange = PageControl1Change
object TabSheet1: TTabSheet
Caption = '清单'
object DBGrid1: TDBGrid
Left = 0
Top = 0
Width = 675
Height = 335
Align = alClient
Color = clInfoBk
DataSource = DataSource1
PopupMenu = PopupMenu1
TabOrder = 0
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -15
TitleFont.Name = '宋体'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'AcceptNo'
Title.Alignment = taCenter
Title.Caption = '订单号'
Width = 61
Visible = True
end
item
Expanded = False
FieldName = 'AcceptDate'
Title.Alignment = taCenter
Title.Caption = '验收日期'
Width = 75
Visible = True
end
item
Expanded = False
FieldName = 'DepCode'
Title.Alignment = taCenter
Title.Caption = '部门编码'
Width = 65
Visible = True
end
item
Expanded = False
FieldName = 'VendorCode'
Title.Alignment = taCenter
Title.Caption = '供应商'
Visible = True
end
item
Expanded = False
FieldName = 'vendorname'
Title.Alignment = taCenter
Title.Caption = '供应商名称'
Width = 85
Visible = True
end
item
Expanded = False
FieldName = 'Place'
Title.Alignment = taCenter
Title.Caption = '存放地点'
Width = 73
Visible = True
end
item
Expanded = False
FieldName = 'OrderNo'
Title.Alignment = taCenter
Title.Caption = '采购订单号'
Width = 83
Visible = True
end
item
Expanded = False
FieldName = 'SqaureMode'
Title.Alignment = taCenter
Title.Caption = '结算方式'
Width = 67
Visible = True
end
item
Expanded = False
FieldName = 'PayDate'
Title.Alignment = taCenter
Title.Caption = '付款日期'
Width = 80
Visible = True
end
item
Expanded = False
FieldName = 'Count1'
Title.Alignment = taCenter
Title.Caption = '合计进货数量'
Width = 69
Visible = True
end
item
Expanded = False
FieldName = 'Total'
Title.Alignment = taCenter
Title.Caption = '合计售价金额'
Width = 88
Visible = True
end
item
Expanded = False
FieldName = 'ZhiDan'
Title.Alignment = taCenter
Title.Caption = '制单人'
Width = 62
Visible = True
end
item
Expanded = False
FieldName = 'YeWu'
Title.Alignment = taCenter
Title.Caption = '业务员'
Width = 79
Visible = True
end
item
Expanded = False
FieldName = 'PrnTimes'
Title.Alignment = taCenter
Title.Caption = '打印次数'
Width = 59
Visible = True
end
item
Expanded = False
FieldName = 'AccDate'
Title.Alignment = taCenter
Title.Caption = '记账日期'
Width = 78
Visible = True
end>
end
end
object TabSheet2: TTabSheet
Caption = '单据'
ImageIndex = 1
object DBGrid2: TDBGrid
Left = 0
Top = 121
Width = 675
Height = 214
Align = alClient
Color = clInfoBk
DataSource = DataSource2
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = '宋体'
Font.Style = []
ParentFont = False
ReadOnly = True
TabOrder = 0
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -12
TitleFont.Name = '宋体'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'PluCode'
Title.Alignment = taCenter
Title.Caption = '商品编码'
Title.Font.Charset = GB2312_CHARSET
Title.Font.Color = clWindowText
Title.Font.Height = -15
Title.Font.Name = '宋体'
Title.Font.Style = []
Width = 81
Visible = True
end
item
Expanded = False
FieldName = 'barcode'
Title.Caption = '条码'
Title.Font.Charset = GB2312_CHARSET
Title.Font.Color = clWindowText
Title.Font.Height = -16
Title.Font.Name = '宋体'
Title.Font.Style = []
Width = 143
Visible = True
end
item
Expanded = False
FieldName = 'PluName'
Title.Alignment = taCenter
Title.Caption = '商品名称'
Title.Font.Charset = GB2312_CHARSET
Title.Font.Color = clWindowText
Title.Font.Height = -15
Title.Font.Name = '宋体'
Title.Font.Style = []
Width = 124
Visible = True
end
item
Expanded = False
FieldName = 'CargoNo'
Title.Alignment = taCenter
Title.Caption = '货号'
Title.Font.Charset = GB2312_CHARSET
Title.Font.Color = clWindowText
Title.Font.Height = -15
Title.Font.Name = '宋体'
Title.Font.Style = []
Width = 70
Visible = True
end
item
Expanded = False
FieldName = 'Spec'
Title.Alignment = taCenter
Title.Caption = '规格'
Title.Font.Charset = GB2312_CHARSET
Title.Font.Color = clWindowText
Title.Font.Height = -15
Title.Font.Name = '宋体'
Title.Font.Style = []
Width = 68
Visible = True
end
item
Expanded = False
FieldName = 'Unit'
Title.Alignment = taCenter
Title.Caption = '单位'
Title.Font.Charset = GB2312_CHARSET
Title.Font.Color = clWindowText
Title.Font.Height = -15
Title.Font.Name = '宋体'
Title.Font.Style = []
Width = 67
Visible = True
end
item
Expanded = False
FieldName = 'JPrice'
Title.Alignment = taCenter
Title.Caption = '进价'
Title.Font.Charset = GB2312_CHARSET
Title.Font.Color = clWindowText
Title.Font.Height = -15
Title.Font.Name = '宋体'
Title.Font.Style = []
Width = 91
Visible = True
end
item
Expanded = False
FieldName = 'Price'
Title.Alignment = taCenter
Title.Caption = '售价'
Title.Font.Charset = GB2312_CHARSET
Title.Font.Color = clWindowText
Title.Font.Height = -15
Title.Font.Name = '宋体'
Title.Font.Style = []
Width = 68
Visible = True
end
item
Expanded = False
FieldName = 'Count1'
Title.Alignment = taCenter
Title.Caption = '进货数量'
Title.Font.Charset = GB2312_CHARSET
Title.Font.Color = clWindowText
Title.Font.Height = -15
Title.Font.Name = '宋体'
Title.Font.Style = []
Width = 62
Visible = True
end
item
Expanded = False
FieldName = 'Cost'
Title.Alignment = taCenter
Title.Caption = '进价金额'
Title.Font.Charset = GB2312_CHARSET
Title.Font.Color = clWindowText
Title.Font.Height = -15
Title.Font.Name = '宋体'
Title.Font.Style = []
Width = 72
Visible = True
end
item
Expanded = False
FieldName = 'Total'
Title.Alignment = taCenter
Title.Caption = '售价金额'
Title.Font.Charset = GB2312_CHARSET
Title.Font.Color = clWindowText
Title.Font.Height = -15
Title.Font.Name = '宋体'
Title.Font.Style = []
Width = 74
Visible = True
end
item
Expanded = False
FieldName = 'JXCount'
Title.Alignment = taCenter
Title.Caption = '进销差价'
Title.Font.Charset = GB2312_CHARSET
Title.Font.Color = clWindowText
Title.Font.Height = -15
Title.Font.Name = '宋体'
Title.Font.Style = []
Width = 77
Visible = True
end
item
Expanded = False
FieldName = 'JTaxRate'
Title.Alignment = taCenter
Title.Caption = '进项税率'
Title.Font.Charset = GB2312_CHARSET
Title.Font.Color = clWindowText
Title.Font.Height = -15
Title.Font.Name = '宋体'
Title.Font.Style = []
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -