📄 proinffrm.dfm
字号:
inherited frmProInf: TfrmProInf
Left = 227
Top = 116
Caption = '产品信息'
OldCreateOrder = True
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object Label1: TLabel
Left = 352
Top = 16
Width = 52
Height = 13
Caption = '产品名称'
end
object Label2: TLabel
Left = 16
Top = 54
Width = 52
Height = 13
Caption = '产品价格'
end
object Label3: TLabel
Left = 16
Top = 88
Width = 52
Height = 13
Caption = '备注信息'
end
object lblProClass: TLabel
Left = 16
Top = 16
Width = 52
Height = 13
Caption = '产品体系'
end
object Label4: TLabel
Left = 280
Top = 56
Width = 53
Height = 13
Caption = '(人民币)'
end
object lblPrdShape: TLabel
Left = 352
Top = 56
Width = 52
Height = 13
Caption = '产品形状'
Transparent = True
end
object SpeedButton1: TSpeedButton
Left = 288
Top = 16
Width = 23
Height = 22
Caption = '+'
Visible = False
end
object SpeedButton2: TSpeedButton
Left = 632
Top = 51
Width = 23
Height = 22
Caption = '+'
Visible = False
end
object grdProInf: TDBGrid
Left = 16
Top = 240
Width = 649
Height = 185
DataSource = dsProInf
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
ReadOnly = True
TabOrder = 8
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -13
TitleFont.Name = '宋体'
TitleFont.Style = []
OnDblClick = grdProInfDblClick
end
object btnAdd: TButton
Left = 16
Top = 200
Width = 75
Height = 25
Caption = '添加(&A)'
Enabled = False
TabOrder = 5
OnClick = btnAddClick
end
object btnSave: TButton
Left = 115
Top = 200
Width = 75
Height = 25
Caption = '保存(&S)'
Enabled = False
TabOrder = 6
OnClick = btnSaveClick
end
object rtfRemark: TRichEdit
Left = 16
Top = 112
Width = 649
Height = 76
Lines.Strings = (
'rtfRemark')
TabOrder = 4
OnChange = edtNameChange
end
object btnDelete: TButton
Left = 216
Top = 200
Width = 75
Height = 25
Caption = '删除(&D)'
Enabled = False
TabOrder = 7
OnClick = btnDeleteClick
end
object edtName: TEdit
Left = 416
Top = 12
Width = 200
Height = 21
TabOrder = 1
OnChange = edtNameChange
end
object edtPrice: TEdit
Left = 80
Top = 50
Width = 200
Height = 21
TabOrder = 2
OnChange = edtNameChange
OnKeyPress = edtPriceKeyPress
end
object cboPrdKnd: TComboBox
Left = 80
Top = 16
Width = 200
Height = 21
ItemHeight = 13
TabOrder = 0
OnChange = edtNameChange
end
object cboPrdShape: TComboBox
Left = 416
Top = 51
Width = 201
Height = 21
ItemHeight = 13
TabOrder = 3
OnChange = edtNameChange
end
object dsProInf: TDataSource
DataSet = qryProInf
Left = 24
Top = 256
end
object qryProInf: TADOQuery
CacheSize = 1500
Connection = dmMain.cnnDB
Parameters = <>
Prepared = True
Left = 24
Top = 288
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -