📄 u_bgd.dfm
字号:
Visible = True
end
item
Color = clBtnHighlight
Expanded = False
FieldName = 'ShangPingName'
Title.Alignment = taCenter
Title.Caption = '商品名称、规格型号'
Width = 150
Visible = True
end
item
Color = clBtnHighlight
Expanded = False
FieldName = 'ShuLiang'
Title.Alignment = taCenter
Title.Caption = '数量及单位'
Width = 68
Visible = True
end
item
Color = clBtnHighlight
Expanded = False
FieldName = 'Price'
Title.Alignment = taCenter
Title.Caption = '单价'
Width = 67
Visible = True
end
item
Color = clBtnHighlight
Expanded = False
FieldName = 'Amount'
Title.Alignment = taCenter
Title.Caption = '总价'
Width = 103
Visible = True
end
item
Color = clBtnHighlight
Expanded = False
FieldName = 'BiZhi'
Title.Alignment = taCenter
Title.Caption = '币值'
Width = 43
Visible = True
end
item
Color = clBtnHighlight
Expanded = False
FieldName = 'ZhengMian'
Title.Alignment = taCenter
Title.Caption = '征免'
Visible = True
end>
end
end
object Panel5: TPanel
Left = 305
Top = 248
Width = 121
Height = 138
BevelInner = bvLowered
TabOrder = 4
object Label41: TLabel
Left = 8
Top = 2
Width = 89
Height = 12
AutoSize = False
Caption = '标记唛头及备注'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
Transparent = True
end
object DBMemo1: TDBMemo
Tag = 6
Left = 8
Top = 16
Width = 105
Height = 113
Color = clInfoBk
DataField = 'MarkNos'
DataSource = DataSourceBGD
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
ReadOnly = True
ScrollBars = ssBoth
TabOrder = 0
OnKeyPress = DBMemo1KeyPress
end
end
object Panel6: TPanel
Left = 426
Top = 248
Width = 113
Height = 138
BevelInner = bvLowered
TabOrder = 5
object Label33: TLabel
Left = 8
Top = 2
Width = 73
Height = 12
AutoSize = False
Caption = '税费征收情况'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
Transparent = True
end
object DBMemo2: TDBMemo
Tag = 7
Left = 8
Top = 16
Width = 97
Height = 113
Color = clInfoBk
DataField = 'Tax'
DataSource = DataSourceBGD
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
ReadOnly = True
ScrollBars = ssVertical
TabOrder = 0
end
end
object Panel7: TPanel
Left = 1
Top = 248
Width = 304
Height = 138
BevelInner = bvLowered
TabOrder = 6
object Label34: TLabel
Left = 8
Top = 15
Width = 42
Height = 12
AutoSize = False
Caption = '录入员'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
Transparent = True
end
object Label74: TLabel
Left = 8
Top = 48
Width = 49
Height = 12
AutoSize = False
Caption = '录入单位'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
Transparent = True
end
object Label75: TLabel
Left = 152
Top = 14
Width = 42
Height = 12
AutoSize = False
Caption = '报关员'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
Transparent = True
end
object Label76: TLabel
Left = 8
Top = 78
Width = 49
Height = 12
AutoSize = False
Caption = '单位地址'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
Transparent = True
end
object Label77: TLabel
Left = 9
Top = 109
Width = 48
Height = 12
AutoSize = False
Caption = '邮 编'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
Transparent = True
end
object Label78: TLabel
Left = 161
Top = 109
Width = 28
Height = 12
AutoSize = False
Caption = '电话'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
Transparent = True
end
object DBEdit30: TDBEdit
Left = 59
Top = 13
Width = 86
Height = 20
Color = clInfoBk
DataField = 'LuRuRen'
DataSource = DataSourceBGD
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
ReadOnly = True
TabOrder = 0
OnKeyPress = DBEdit30KeyPress
end
object DBEdit31: TDBEdit
Tag = 2
Left = 59
Top = 45
Width = 238
Height = 20
Color = clInfoBk
DataField = 'LuRuDanWei'
DataSource = DataSourceBGD
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
ReadOnly = True
TabOrder = 2
OnKeyPress = DBEdit31KeyPress
end
object DBEdit32: TDBEdit
Tag = 1
Left = 194
Top = 13
Width = 103
Height = 20
Color = clInfoBk
DataField = 'BaoGuanRen'
DataSource = DataSourceBGD
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
ReadOnly = True
TabOrder = 1
OnKeyPress = DBEdit32KeyPress
end
object DBEdit33: TDBEdit
Tag = 3
Left = 59
Top = 75
Width = 238
Height = 20
Color = clInfoBk
DataField = 'Address'
DataSource = DataSourceBGD
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
ReadOnly = True
TabOrder = 3
OnKeyPress = DBEdit33KeyPress
end
object DBEdit34: TDBEdit
Tag = 4
Left = 59
Top = 105
Width = 94
Height = 20
Color = clInfoBk
DataField = 'YouBian'
DataSource = DataSourceBGD
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
ReadOnly = True
TabOrder = 4
OnKeyPress = DBEdit34KeyPress
end
object DBEdit35: TDBEdit
Tag = 5
Left = 192
Top = 105
Width = 105
Height = 20
Color = clInfoBk
DataField = 'DianHua'
DataSource = DataSourceBGD
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
ReadOnly = True
TabOrder = 5
OnKeyPress = DBEdit35KeyPress
end
end
end
object PopupMenu1: TPopupMenu
Left = 344
Top = 343
object N1: TMenuItem
Caption = '订单定位'
OnClick = N1Click
end
object N3: TMenuItem
Caption = '退出'
OnClick = N3Click
end
end
object ADOQueryBGDXC: TADOQuery
Connection = DM.ADOConnection
Parameters = <>
SQL.Strings = (
'select * from xs_BGJC')
Left = 376
Top = 345
end
object DataSourceBGD: TDataSource
DataSet = DM.ADOTableBGD
OnDataChange = DataSourceBGDDataChange
Left = 344
Top = 305
end
object DataSourceBGDChild: TDataSource
DataSet = DM.ADOQueryBGDChild
OnDataChange = DataSourceBGDChildDataChange
Left = 643
Top = 309
end
object ADOQuerybgd: TADOQuery
Connection = DM.ADOConnection
Parameters = <>
SQL.Strings = (
'select * from xs_bgd')
Left = 248
Top = 156
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -