?? ps_comproduct.dfm
字號:
object F_comproduct: TF_comproduct
Left = 255
Top = 172
BorderStyle = bsSingle
Caption = '產品表'
ClientHeight = 267
ClientWidth = 394
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
FormStyle = fsMDIChild
OldCreateOrder = False
Position = poMainFormCenter
Visible = True
OnActivate = FormActivate
OnClose = FormClose
OnCloseQuery = FormCloseQuery
PixelsPerInch = 96
TextHeight = 13
object GroupBox1: TGroupBox
Left = 0
Top = 0
Width = 394
Height = 267
Align = alClient
TabOrder = 0
object L_productid: TLabel
Left = 16
Top = 22
Width = 65
Height = 16
Caption = '產品編號：'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object L_productname: TLabel
Left = 16
Top = 52
Width = 65
Height = 16
Caption = '品名規格：'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object L_unit: TLabel
Left = 16
Top = 83
Width = 65
Height = 16
Caption = '計量單位：'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object L_suggprice: TLabel
Left = 200
Top = 81
Width = 65
Height = 16
Caption = '建議售價：'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object L_stdbuying: TLabel
Left = 200
Top = 110
Width = 65
Height = 16
Caption = '標準進價：'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object L_earlycost: TLabel
Left = 200
Top = 138
Width = 65
Height = 16
Caption = '期初成本：'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object L_presentcost: TLabel
Left = 200
Top = 167
Width = 65
Height = 16
Caption = '現有成本：'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object L_stdcost: TLabel
Left = 200
Top = 195
Width = 65
Height = 16
Caption = '標準成本：'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object L_taxrate: TLabel
Left = 200
Top = 224
Width = 65
Height = 16
Caption = '營業稅率：'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object L_memo: TLabel
Left = 16
Top = 110
Width = 39
Height = 16
Caption = '備注：'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object E_productid: TDBEdit
Left = 104
Top = 22
Width = 97
Height = 21
DataField = 'productid'
DataSource = comdatabase.DS_comproduct
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 0
OnClick = E_productidClick
end
object E_productname: TDBEdit
Left = 104
Top = 52
Width = 273
Height = 21
DataField = 'productname'
DataSource = comdatabase.DS_comproduct
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 1
OnClick = E_productidClick
end
object E_unit: TDBEdit
Left = 104
Top = 83
Width = 49
Height = 21
DataField = 'unit'
DataSource = comdatabase.DS_comproduct
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 2
OnClick = E_productidClick
end
object E_suggprice: TDBEdit
Left = 280
Top = 79
Width = 97
Height = 21
DataField = 'suggprice'
DataSource = comdatabase.DS_comproduct
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 3
OnClick = E_productidClick
end
object E_stdbuying: TDBEdit
Left = 280
Top = 108
Width = 97
Height = 21
DataField = 'stdbuying'
DataSource = comdatabase.DS_comproduct
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 4
OnClick = E_productidClick
end
object E_earlycost: TDBEdit
Left = 280
Top = 137
Width = 97
Height = 21
DataField = 'earlycost'
DataSource = comdatabase.DS_comproduct
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 5
OnClick = E_productidClick
end
object E_presentcost: TDBEdit
Left = 280
Top = 166
Width = 97
Height = 21
TabStop = False
DataField = 'presentcost'
DataSource = comdatabase.DS_comproduct
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
ReadOnly = True
TabOrder = 6
OnClick = E_productidClick
end
object E_stdcost: TDBEdit
Left = 280
Top = 195
Width = 97
Height = 21
DataField = 'stdcost'
DataSource = comdatabase.DS_comproduct
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 7
OnClick = E_productidClick
end
object E_taxrate: TDBEdit
Left = 280
Top = 224
Width = 97
Height = 21
DataField = 'taxrate'
DataSource = comdatabase.DS_comproduct
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 8
OnClick = E_productidClick
end
object M_memo: TDBMemo
Left = 16
Top = 128
Width = 169
Height = 112
DataField = 'memo'
DataSource = comdatabase.DS_comproduct
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
MaxLength = 400
ParentFont = False
ScrollBars = ssVertical
TabOrder = 9
end
end
end
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -