unitmain.dfm
来自「绿色衡器称重系统(串口)」· DFM 代码 · 共 1,003 行 · 第 1/3 页
DFM
1,003 行
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object lbJianJinDanHao: TDBText
Left = 72
Top = 26
Width = 120
Height = 13
AutoSize = True
DataField = 'ListID'
DataSource = DataSource1
Font.Charset = GB2312_CHARSET
Font.Color = clMaroon
Font.Height = -13
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object SpeedButton1: TSpeedButton
Left = 150
Top = 302
Width = 17
Height = 23
Hint = #35745#31639#22120
Flat = True
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00337000000000
73333337777777773F333308888888880333337F3F3F3FFF7F33330808089998
0333337F737377737F333308888888880333337F3F3F3F3F7F33330808080808
0333337F737373737F333308888888880333337F3F3F3F3F7F33330808080808
0333337F737373737F333308888888880333337F3F3F3F3F7F33330808080808
0333337F737373737F333308888888880333337F3FFFFFFF7F33330800000008
0333337F7777777F7F333308000E0E080333337F7FFFFF7F7F33330800000008
0333337F777777737F333308888888880333337F333333337F33330888888888
03333373FFFFFFFF733333700000000073333337777777773333}
NumGlyphs = 2
ParentShowHint = False
ShowHint = True
OnClick = SpeedButton1Click
end
object DBMemo1: TDBMemo
Left = 12
Top = 190
Width = 251
Height = 111
DataField = 'beizhu'
DataSource = DataSource1
TabOrder = 5
OnKeyUp = DBMemo1KeyUp
end
object dbedtWweight: TDBEdit
Left = 5
Top = 343
Width = 82
Height = 21
Color = clActiveCaption
DataField = 'MaoZhong'
DataSource = DataSource1
Font.Charset = GB2312_CHARSET
Font.Color = clYellow
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 6
end
object dbedtFweight: TDBEdit
Left = 91
Top = 343
Width = 83
Height = 21
Color = clBackground
DataField = 'PiZhong'
DataSource = DataSource1
Font.Charset = GB2312_CHARSET
Font.Color = clInfoBk
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 7
end
object dbedtNweight: TDBEdit
Left = 178
Top = 343
Width = 82
Height = 21
Color = clGradientActiveCaption
DataField = 'JingZhong'
DataSource = DataSource1
Font.Charset = GB2312_CHARSET
Font.Color = clMaroon
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 8
end
object dbcCPH: TDBComboBox
Left = 72
Top = 49
Width = 57
Height = 21
DataField = 'ChePai'
DataSource = DataSource1
ItemHeight = 13
TabOrder = 0
OnChange = dbcCPHChange
OnKeyUp = dbcCPHKeyUp
end
object dbcCPHN: TDBComboBox
Left = 133
Top = 50
Width = 131
Height = 21
DataField = 'ChePaiN'
DataSource = DataSource1
ItemHeight = 13
TabOrder = 1
OnChange = dbcCPHNChange
OnKeyUp = dbcCPHNKeyUp
end
object dbcHPMC: TDBComboBox
Left = 72
Top = 80
Width = 192
Height = 21
DataField = 'HuoPin'
DataSource = DataSource1
ItemHeight = 13
TabOrder = 2
OnKeyUp = dbcHPMCKeyUp
end
object dbcFHDW: TDBComboBox
Left = 72
Top = 112
Width = 192
Height = 21
DataField = 'FaHuoDW'
DataSource = DataSource1
ItemHeight = 13
TabOrder = 3
OnKeyUp = dbcFHDWKeyUp
end
object dbcSHDW: TDBComboBox
Left = 72
Top = 146
Width = 193
Height = 21
DataField = 'ShouHuoDW'
DataSource = DataSource1
ItemHeight = 13
TabOrder = 4
OnKeyUp = dbcSHDWKeyUp
end
end
object GroupBox2: TGroupBox
Left = 274
Top = 80
Width = 413
Height = 431
Caption = #21015#34920':'
TabOrder = 2
object DBNavigator1: TDBNavigator
Left = 2
Top = 404
Width = 409
Height = 25
DataSource = DataSource1
VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast]
Align = alBottom
TabOrder = 0
end
object DBGrid1: TDBGrid
Left = 2
Top = 15
Width = 409
Height = 389
Align = alClient
Ctl3D = False
DataSource = DataSource1
FixedColor = clCream
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
ParentCtl3D = False
PopupMenu = PopupMenu1
TabOrder = 1
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -13
TitleFont.Name = #23435#20307
TitleFont.Style = []
Columns = <
item
Alignment = taCenter
Expanded = False
FieldName = 'ListID'
Title.Alignment = taCenter
Title.Caption = #30917#21333#21495
Width = 76
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'ChePai'
Title.Alignment = taCenter
Title.Caption = #36710#29260#21069#32512
Width = 56
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'ChePaiN'
Title.Alignment = taCenter
Title.Caption = #36710#29260#21495
Width = 48
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'ShouHuoDW'
Title.Alignment = taCenter
Title.Caption = #25910#36135#21333#20301
Width = 140
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'FaHuoDW'
Title.Alignment = taCenter
Title.Caption = #21457#36135#21333#20301
Width = 118
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'HuoPin'
Title.Alignment = taCenter
Title.Caption = #36135#21697
Width = 112
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'MaoZhong'
Title.Alignment = taCenter
Title.Caption = #27611#37325
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'MaoZhongRQ'
Title.Alignment = taCenter
Title.Caption = #27611#37325#26085#26399
Width = 79
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'PiZhong'
Title.Alignment = taCenter
Title.Caption = #30382#37325
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'PiZhongRQ'
Title.Alignment = taCenter
Title.Caption = #30382#37325#26085#26399
Width = 80
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'JingZhong'
Title.Alignment = taCenter
Title.Caption = #20928#37325
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'JingZhongRQ'
Title.Alignment = taCenter
Title.Caption = #20928#37325#26085#26399
Width = 79
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'SiBangYuan'
Title.Alignment = taCenter
Title.Caption = #21496#30917#21592
Visible = True
end>
end
object MSComm1: TMSComm
Left = 184
Top = 202
Width = 32
Height = 32
ControlData = {
2143341208000000ED030000ED03000001568A64000006000000010000040000
00020000C01200000000080000000000000000003F00000001000000}
end
end
object BitBtn1: TBitBtn
Left = 20
Top = 461
Width = 47
Height = 39
Caption = #28155#21152
TabOrder = 3
OnClick = BitBtn1Click
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?