📄 u_goodsinfo.~dfm
字号:
object frmGoodsInfo: TfrmGoodsInfo
Left = 223
Top = 212
BorderIcons = [biSystemMenu]
BorderStyle = bsSingle
Caption = #21830#21697#20449#24687
ClientHeight = 386
ClientWidth = 727
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
FormStyle = fsMDIChild
OldCreateOrder = False
Position = poScreenCenter
Visible = True
OnClose = FormClose
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 12
object Panel1: TPanel
Left = 0
Top = 0
Width = 727
Height = 386
Align = alClient
BevelOuter = bvLowered
TabOrder = 0
object DBGrid1: TDBGrid
Left = 1
Top = 1
Width = 725
Height = 344
Align = alTop
DataSource = DataSource1
ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
ReadOnly = True
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -12
TitleFont.Name = #23435#20307
TitleFont.Style = []
OnDblClick = DBGrid1DblClick
Columns = <
item
Alignment = taCenter
Expanded = False
FieldName = 'ClassName'
Title.Alignment = taCenter
Title.Caption = #31867' '#21035
Width = 80
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'GoodsBH'
Title.Alignment = taCenter
Title.Caption = #32534' '#21495
Width = 80
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'GoodsName'
Title.Alignment = taCenter
Title.Caption = #21517' '#31216
Width = 120
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'GoodsSpec'
Title.Alignment = taCenter
Title.Caption = #35268' '#26684
Width = 90
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'GoodsModel'
Title.Alignment = taCenter
Title.Caption = #22411' '#21495
Width = 85
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'GoodsUnit'
Title.Alignment = taCenter
Title.Caption = #21333' '#20301
Width = 80
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'GoodsInPrice'
Title.Alignment = taCenter
Title.Caption = #20837#24211#20215
Width = 80
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'GoodsOutPrice'
Title.Alignment = taCenter
Title.Caption = #38646#21806#20215
Width = 80
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'GoodsArea'
Title.Alignment = taCenter
Title.Caption = #21306' '#22495
Width = 100
Visible = True
end
item
Expanded = False
FieldName = 'GoodsNote'
Title.Caption = #22791' '#27880
Width = 100
Visible = True
end>
end
object btnAdd: TBitBtn
Left = 240
Top = 355
Width = 75
Height = 25
Caption = #22686' '#21152
TabOrder = 1
OnClick = btnAddClick
end
object btnEdit: TBitBtn
Left = 365
Top = 355
Width = 75
Height = 25
Caption = #20462' '#25913
TabOrder = 2
OnClick = btnEditClick
end
object btnDelete: TBitBtn
Left = 498
Top = 355
Width = 75
Height = 25
Caption = #21024' '#38500
TabOrder = 3
OnClick = btnDeleteClick
end
object btnClose: TBitBtn
Left = 624
Top = 355
Width = 75
Height = 25
Caption = #36864' '#20986
TabOrder = 4
OnClick = btnCloseClick
end
object edtTotal: TLabeledEdit
Left = 64
Top = 356
Width = 121
Height = 20
EditLabel.Width = 36
EditLabel.Height = 12
EditLabel.Caption = #24635#35745#65306
LabelPosition = lpLeft
TabOrder = 5
end
end
object qry: TADOQuery
Connection = frmDataCtrl.ADOConn
CursorType = ctStatic
AfterOpen = qryAfterOpen
Parameters = <>
SQL.Strings = (
'select * from vw_GoodsInfo')
Left = 480
Top = 80
end
object DataSource1: TDataSource
DataSet = qry
Left = 536
Top = 80
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -