📄 chanpin.dfm
字号:
object Form3: TForm3
Left = 99
Top = 121
Width = 595
Height = 343
BorderIcons = [biSystemMenu]
Caption = #21407#26009#36164#26009#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
Scaled = False
OnActivate = FormActivate
OnClose = FormClose
PixelsPerInch = 96
TextHeight = 13
object Panel6: TPanel
Left = 0
Top = 0
Width = 587
Height = 313
BevelInner = bvLowered
BevelWidth = 2
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 0
object StaticText2: TStaticText
Left = 5
Top = 4
Width = 144
Height = 23
Alignment = taCenter
BorderStyle = sbsSunken
Caption = #21407#26448#26009#36164#26009#24405#20837
Color = 13555421
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -19
Font.Name = #38582#20070
Font.Style = []
ParentColor = False
ParentFont = False
TabOrder = 0
end
object DBGrid2: TDBGrid
Left = 5
Top = 34
Width = 487
Height = 150
Color = 15137023
DataSource = DataSource1
ImeMode = imAlpha
ReadOnly = True
TabOrder = 1
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -12
TitleFont.Name = #23435#20307
TitleFont.Style = []
OnDblClick = DBGrid2DblClick
OnKeyPress = DBGrid2KeyPress
Columns = <
item
Expanded = False
FieldName = 'lbmc'
Title.Caption = #31867#21035#21517#31216
Width = 56
Visible = True
end
item
Expanded = False
FieldName = 'cpbm'
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
Title.Alignment = taCenter
Title.Caption = #21407#26009#32534#30721
Title.Color = 13555421
Width = 60
Visible = True
end
item
Expanded = False
FieldName = 'cpmc'
Font.Charset = GB2312_CHARSET
Font.Color = clMaroon
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
Title.Alignment = taCenter
Title.Caption = #21407#26009#21517#31216
Title.Color = 13555421
Width = 87
Visible = True
end
item
Expanded = False
FieldName = 'dw'
Title.Alignment = taCenter
Title.Caption = #21333#20301
Title.Color = 13555421
Visible = True
end
item
Expanded = False
FieldName = 'dj'
Title.Alignment = taCenter
Title.Caption = #21333#20215
Title.Color = 13555421
Width = 44
Visible = True
end
item
Expanded = False
FieldName = 'pym'
Title.Alignment = taCenter
Title.Caption = #25340#38899#30721
Title.Color = 13555421
Width = 55
Visible = True
end
item
Expanded = False
FieldName = 'sccjmc'
Title.Alignment = taCenter
Title.Caption = #21378#23478
Title.Color = 13555421
Width = 115
Visible = True
end>
end
object p61: TPanel
Left = 5
Top = 213
Width = 487
Height = 93
BevelOuter = bvLowered
Enabled = False
TabOrder = 2
object Shape1: TShape
Left = 3
Top = 5
Width = 482
Height = 83
Brush.Color = clSilver
Pen.Color = 13817840
Pen.Width = 2
end
object Shape5: TShape
Left = 158
Top = 7
Width = 2
Height = 55
Brush.Color = clSilver
Pen.Color = 13817840
Pen.Width = 2
end
object Label8: TLabel
Left = 8
Top = 16
Width = 60
Height = 12
Caption = #21407#26009#32534#30721#65306
end
object Label9: TLabel
Left = 7
Top = 42
Width = 54
Height = 12
Caption = 'pos'#32534#30721#65306
end
object Label10: TLabel
Left = 290
Top = 42
Width = 36
Height = 12
Caption = #21333#20301#65306
end
object Label11: TLabel
Left = 290
Top = 68
Width = 36
Height = 12
Caption = #21333#20215#65306
end
object Shape2: TShape
Left = 4
Top = 35
Width = 386
Height = 1
Brush.Color = 11316396
Pen.Color = 13817840
end
object Shape3: TShape
Left = 4
Top = 61
Width = 385
Height = 1
Brush.Color = 11316396
Pen.Color = 13817840
end
object Shape4: TShape
Left = 4
Top = 61
Width = 182
Height = 26
Brush.Color = 11316396
Pen.Color = 13817840
end
object Label1: TLabel
Left = 7
Top = 69
Width = 54
Height = 12
Caption = #21378' '#23478#65306
end
object SpeedButton1: TSpeedButton
Left = 158
Top = 64
Width = 24
Height = 22
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
04000000000080000000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00999999999999
99999C4F0F44400004499CC0F040088880099CC0F008888000099CCF00888007
88099CCC0888077780499CC0FF80777880499CC0FF00877804499C0FF077F870
44499C0FF0777F8444499C0F077770F8F4499C0F07770CC084499C007700CCF8
F4499CC000CCCCCCCC499CCCCCCCCCCCCCC99999999999999999}
Layout = blGlyphTop
OnClick = SpeedButton1Click
end
object Label3: TLabel
Left = 172
Top = 44
Width = 60
Height = 12
Caption = #25340' '#38899' '#30721#65306
end
object Shape6: TShape
Left = 388
Top = 6
Width = 2
Height = 82
Brush.Color = clSilver
Pen.Color = 13817840
Pen.Width = 2
end
object Label4: TLabel
Left = 170
Top = 16
Width = 60
Height = 12
Caption = #21407#26009#21517#31216#65306
end
object Shape7: TShape
Left = 285
Top = 36
Width = 2
Height = 52
Brush.Color = clSilver
Pen.Color = 13817840
Pen.Width = 2
end
object Button13: TButton
Left = 419
Top = 25
Width = 50
Height = 25
Caption = #30830#23450
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 0
OnClick = Button13Click
end
object Button14: TButton
Left = 419
Top = 52
Width = 50
Height = 25
Caption = #25918#24323
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 1
OnClick = Button14Click
end
object DBEdit3: TDBEdit
Left = 59
Top = 12
Width = 96
Height = 20
CharCase = ecUpperCase
DataField = 'cpbm'
DataSource = DataSource1
ImeMode = imAlpha
TabOrder = 2
OnExit = DBEdit3Exit
OnKeyPress = DBEdit3KeyPress
end
object DBEdit4: TDBEdit
Left = 59
Top = 38
Width = 96
Height = 20
CharCase = ecUpperCase
DataField = 'posbm'
DataSource = DataSource1
TabOrder = 3
OnKeyPress = DBEdit4KeyPress
end
object DBEdit5: TDBEdit
Left = 326
Top = 38
Width = 59
Height = 20
DataField = 'dw'
DataSource = DataSource1
ImeName = #26234#33021'ABC'#36755#20837#27861
TabOrder = 4
OnKeyPress = DBEdit5KeyPress
end
object DBEdit6: TDBEdit
Left = 326
Top = 64
Width = 60
Height = 20
DataField = 'dj'
DataSource = DataSource1
TabOrder = 5
OnKeyPress = DBEdit6KeyPress
end
object DBEdit2: TDBEdit
Left = 58
Top = 64
Width = 96
Height = 20
CharCase = ecUpperCase
DataField = 'sccj'
DataSource = DataSource1
TabOrder = 6
OnKeyDown = DBEdit2KeyDown
OnKeyPress = DBEdit2KeyPress
end
object DBEdit1: TDBEdit
Left = 227
Top = 40
Width = 51
Height = 20
DataField = 'pym'
DataSource = DataSource1
ImeMode = imAlpha
TabOrder = 7
OnKeyPress = DBEdit1KeyPress
end
object DBEdit7: TDBEdit
Left = 227
Top = 12
Width = 157
Height = 20
CharCase = ecUpperCase
DataField = 'cpmc'
DataSource = DataSource1
ImeName = #26234#33021'ABC'#36755#20837#27861
TabOrder = 8
OnKeyPress = DBEdit7KeyPress
end
end
object p62: TPanel
Left = 494
Top = 32
Width = 90
Height = 274
BevelOuter = bvLowered
Color = 10464172
TabOrder = 3
object Button8: TButton
Left = 8
Top = 24
Width = 75
Height = 25
Caption = #28155#21152
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 0
OnClick = Button8Click
end
object Button9: TButton
Left = 8
Top = 52
Width = 75
Height = 25
Caption = #21024#38500
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 1
OnClick = Button9Click
end
object Button10: TButton
Left = 8
Top = 80
Width = 75
Height = 25
Caption = #20462#25913
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 2
OnClick = Button10Click
end
object Button11: TButton
Left = 8
Top = 152
Width = 75
Height = 25
Caption = #25171#21360
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 3
OnClick = Button11Click
end
object Button12: TButton
Left = 8
Top = 208
Width = 75
Height = 25
Caption = #36820#22238
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 4
OnClick = Button12Click
end
end
object p63: TPanel
Left = 5
Top = 186
Width = 487
Height = 27
BevelOuter = bvLowered
Color = 16106588
TabOrder = 4
object Label6: TLabel
Left = 6
Top = 8
Width = 65
Height = 13
Caption = #20135#21697#20998#31867#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label2: TLabel
Left = 256
Top = 8
Width = 78
Height = 12
Caption = #21333#20215#65288' /'#20803#65289
end
object SpeedButton2: TSpeedButton
Left = 180
Top = 3
Width = 24
Height = 22
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
04000000000080000000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00999999999999
99999C4F0F44400004499CC0F040088880099CC0F008888000099CCF00888007
88099CCC0888077780499CC0FF80777880499CC0FF00877804499C0FF077F870
44499C0FF0777F8444499C0F077770F8F4499C0F07770CC084499C007700CCF8
F4499CC000CCCCCCCC499CCCCCCCCCCCCCC99999999999999999}
Layout = blGlyphTop
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -