?? unit2.dfm
字號:
object FormClassDishMan: TFormClassDishMan
Left = 198
Top = 156
Width = 449
Height = 364
Caption = #33756#21697'/'#33756#35889#24211#32500#25252
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
PixelsPerInch = 96
TextHeight = 13
object TreeView1: TTreeView
Left = 0
Top = 0
Width = 177
Height = 273
Indent = 19
ReadOnly = True
TabOrder = 0
end
object GroupBox1: TGroupBox
Left = 184
Top = 0
Width = 257
Height = 41
Caption = #33756#21697#20449#24687
TabOrder = 1
object StaticText1: TStaticText
Left = 101
Top = 16
Width = 52
Height = 17
Caption = #33756#21697#21517#31216
TabOrder = 0
end
object StaticText2: TStaticText
Left = 5
Top = 16
Width = 52
Height = 17
Caption = #33756#21697#32534#21495
TabOrder = 1
end
object DBEditClassNum: TDBEdit
Left = 53
Top = 13
Width = 36
Height = 21
DataField = 'ClassNum'
DataSource = DataSourceClass
ReadOnly = True
TabOrder = 2
end
object DBEditClassName: TDBEdit
Left = 160
Top = 13
Width = 89
Height = 21
DataField = 'ClassName'
DataSource = DataSourceClass
MaxLength = 18
ReadOnly = True
TabOrder = 3
end
end
object GroupBox2: TGroupBox
Left = 184
Top = 40
Width = 257
Height = 233
Caption = #33756#35889#20449#24687
TabOrder = 2
object StaticText3: TStaticText
Left = 5
Top = 16
Width = 52
Height = 17
Caption = #33756#35889#21517#31216
TabOrder = 0
end
object DBEditDishName: TDBEdit
Left = 53
Top = 13
Width = 99
Height = 21
DataField = 'DishName'
DataSource = DataSourceDish
MaxLength = 18
ReadOnly = True
TabOrder = 1
end
object StaticText4: TStaticText
Left = 5
Top = 35
Width = 52
Height = 17
Caption = #33756#35889#32534#21495
TabOrder = 2
end
object DBEditDishNum: TDBEdit
Left = 53
Top = 33
Width = 52
Height = 21
DataField = 'DishNum'
DataSource = DataSourceDish
ReadOnly = True
TabOrder = 3
end
object StaticText5: TStaticText
Left = 146
Top = 35
Width = 42
Height = 17
Caption = #25240#25187'(%)'
TabOrder = 4
end
object DBEditDisCount: TDBEdit
Left = 191
Top = 33
Width = 57
Height = 21
DataField = 'DisCount'
DataSource = DataSourceDish
ReadOnly = True
TabOrder = 5
end
object StaticText7: TStaticText
Left = 23
Top = 57
Width = 28
Height = 17
Caption = #21333#20301
TabOrder = 6
end
object DBEditUnitName: TDBEdit
Left = 53
Top = 57
Width = 52
Height = 21
DataField = 'DishUnitName'
DataSource = DataSourceDish
ReadOnly = True
TabOrder = 7
end
object StaticText8: TStaticText
Left = 144
Top = 58
Width = 46
Height = 17
Caption = #21333#20215'('#20803')'
TabOrder = 8
end
object DBEditDishPrice: TDBEdit
Left = 191
Top = 57
Width = 57
Height = 21
DataField = 'DishPrice'
DataSource = DataSourceDish
ReadOnly = True
TabOrder = 9
end
object DBMemoDishDescription: TDBMemo
Left = 8
Top = 96
Width = 241
Height = 129
DataField = 'Description'
DataSource = DataSourceDish
MaxLength = 100
ReadOnly = True
ScrollBars = ssBoth
TabOrder = 10
end
object StaticText6: TStaticText
Left = 7
Top = 78
Width = 76
Height = 17
Caption = #33756#35889#25551#36848#20449#24687
TabOrder = 11
end
object StaticText9: TStaticText
Left = 155
Top = 15
Width = 52
Height = 17
Caption = #25152#23646#33756#21697
TabOrder = 12
end
object DBComboBoxDishClass: TDBComboBox
Left = 204
Top = 11
Width = 44
Height = 21
Style = csDropDownList
DataField = 'ClassNum'
DataSource = DataSourceDish
Enabled = False
ItemHeight = 13
ReadOnly = True
TabOrder = 13
end
end
object BitBtnAdd: TBitBtn
Left = 328
Top = 312
Width = 65
Height = 25
Caption = #22686#21152
TabOrder = 3
OnClick = BitBtnAddClick
end
object BitBtnDelete: TBitBtn
Left = 232
Top = 312
Width = 65
Height = 25
Caption = #21024#38500
TabOrder = 4
OnClick = BitBtnDeleteClick
end
object MemoHint: TMemo
Left = 0
Top = 274
Width = 441
Height = 36
Lines.Strings = (
#25552#31034#25991#26412)
ScrollBars = ssVertical
TabOrder = 5
end
object BitBtnModify: TBitBtn
Left = 120
Top = 312
Width = 89
Height = 25
Caption = #20999#25442#33267#20462#25913#27169#24335
TabOrder = 6
OnClick = BitBtnModifyClick
end
object BitBtnReload: TBitBtn
Left = 0
Top = 312
Width = 89
Height = 25
Caption = #37325#26032#36733#20837#25968#25454#24211
TabOrder = 7
OnClick = BitBtnReloadClick
end
object DataSourceClass: TDataSource
DataSet = TableClass
Left = 120
Top = 32
end
object TableClass: TTable
DatabaseName = 'Ch14'
TableName = 'Class.db'
Left = 88
Top = 32
object TableClassClassNum: TStringField
FieldName = 'ClassNum'
Size = 1
end
object TableClassClassName: TStringField
FieldName = 'ClassName'
end
end
object TableDish: TTable
DatabaseName = 'Ch14'
TableName = 'Dish.DB'
Left = 88
Top = 72
object TableDishDishNum: TIntegerField
FieldName = 'DishNum'
end
object TableDishDishName: TStringField
FieldName = 'DishName'
end
object TableDishClassNum: TStringField
FieldName = 'ClassNum'
Size = 1
end
object TableDishDishPrice: TFloatField
FieldName = 'DishPrice'
end
object TableDishDishUnitName: TStringField
FieldName = 'DishUnitName'
Size = 6
end
object TableDishDescription: TMemoField
FieldName = 'Description'
BlobType = ftMemo
Size = 100
end
object TableDishDisCount: TFloatField
FieldName = 'DisCount'
end
end
object DataSourceDish: TDataSource
DataSet = TableDish
Left = 120
Top = 72
end
end
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -