📄 unit4.~dfm
字号:
Width = 265
Height = 113
Caption = #22359#25805#20316
TabOrder = 5
object Label1: TLabel
Left = 16
Top = 24
Width = 24
Height = 13
Caption = #20540#22359
end
object block_edit: TMaskEdit
Left = 12
Top = 38
Width = 221
Height = 21
MaxLength = 32
TabOrder = 0
Text = '12345645678901234567890123456789012'
end
object Write_value: TBitBtn
Left = 160
Top = 64
Width = 73
Height = 41
Caption = #30830#23450
Default = True
TabOrder = 1
OnClick = Write_valueClick
Glyph.Data = {
DE010000424DDE01000000000000760000002800000024000000120000000100
0400000000006801000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333333333333333330000333333333333333333333333F33333333333
00003333344333333333333333388F3333333333000033334224333333333333
338338F3333333330000333422224333333333333833338F3333333300003342
222224333333333383333338F3333333000034222A22224333333338F338F333
8F33333300003222A3A2224333333338F3838F338F33333300003A2A333A2224
33333338F83338F338F33333000033A33333A222433333338333338F338F3333
0000333333333A222433333333333338F338F33300003333333333A222433333
333333338F338F33000033333333333A222433333333333338F338F300003333
33333333A222433333333333338F338F00003333333333333A22433333333333
3338F38F000033333333333333A223333333333333338F830000333333333333
333A333333333333333338330000333333333333333333333333333333333333
0000}
NumGlyphs = 2
end
object writevl: TRadioButton
Left = 88
Top = 80
Width = 57
Height = 17
Caption = #20889#20837
TabOrder = 2
end
object readvl: TRadioButton
Left = 24
Top = 80
Width = 57
Height = 17
Caption = #35835#20986
Checked = True
TabOrder = 3
TabStop = True
end
end
object GroupBox7: TGroupBox
Left = 24
Top = 455
Width = 673
Height = 74
Caption = #21345#23494#38053#20889#20837
TabOrder = 6
object Write_key: TBitBtn
Left = 520
Top = 24
Width = 75
Height = 41
Caption = #20889#20837
Default = True
TabOrder = 0
OnClick = Write_keyClick
Glyph.Data = {
DE010000424DDE01000000000000760000002800000024000000120000000100
0400000000006801000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333333333333333330000333333333333333333333333F33333333333
00003333344333333333333333388F3333333333000033334224333333333333
338338F3333333330000333422224333333333333833338F3333333300003342
222224333333333383333338F3333333000034222A22224333333338F338F333
8F33333300003222A3A2224333333338F3838F338F33333300003A2A333A2224
33333338F83338F338F33333000033A33333A222433333338333338F338F3333
0000333333333A222433333333333338F338F33300003333333333A222433333
333333338F338F33000033333333333A222433333333333338F338F300003333
33333333A222433333333333338F338F00003333333333333A22433333333333
3338F38F000033333333333333A223333333333333338F830000333333333333
333A333333333333333338330000333333333333333333333333333333333333
0000}
NumGlyphs = 2
end
object keyaEdit: TEdit
Left = 40
Top = 40
Width = 121
Height = 21
MaxLength = 12
TabOrder = 1
Text = '666666666666'
end
object acces_edit: TEdit
Left = 176
Top = 40
Width = 121
Height = 21
MaxLength = 8
TabOrder = 2
Text = '08778F69'
end
object keyb_edit: TEdit
Left = 309
Top = 40
Width = 121
Height = 21
MaxLength = 12
PasswordChar = '*'
TabOrder = 3
Text = '888888888888'
end
object StaticText3: TStaticText
Left = 64
Top = 24
Width = 35
Height = 17
Caption = #23494#38053'A'
TabOrder = 4
end
object StaticText4: TStaticText
Left = 336
Top = 24
Width = 35
Height = 17
Caption = #23494#38053'B'
TabOrder = 5
end
object StaticText5: TStaticText
Left = 208
Top = 24
Width = 52
Height = 17
Caption = #23384#21462#25511#21046
TabOrder = 6
end
end
object GroupBox8: TGroupBox
Left = 24
Top = 285
Width = 673
Height = 41
Caption = #35831#36873#25321#22359#21495
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 7
object Blcok0: TRadioButton
Left = 112
Top = 16
Width = 65
Height = 17
Caption = #22359'0'
Checked = True
TabOrder = 0
TabStop = True
OnClick = Blcok0Click
end
object Blcok1: TRadioButton
Left = 232
Top = 16
Width = 57
Height = 17
Caption = #22359'1'
TabOrder = 1
OnClick = Blcok1Click
end
object Blcok2: TRadioButton
Left = 360
Top = 16
Width = 65
Height = 17
Caption = #22359'2'
TabOrder = 2
OnClick = Blcok2Click
end
object Blcok3: TRadioButton
Left = 496
Top = 16
Width = 73
Height = 17
Caption = #22359'3'
Enabled = False
TabOrder = 3
OnClick = Blcok3Click
end
end
object GroupBox9: TGroupBox
Left = 216
Top = 336
Width = 209
Height = 113
Caption = #22686#20943#20540#25805#20316
TabOrder = 8
object Label4: TLabel
Left = 32
Top = 29
Width = 36
Height = 13
Caption = #22686#20943#20540
end
object Add_value: TBitBtn
Left = 128
Top = 64
Width = 67
Height = 41
Caption = #30830#23450
Default = True
TabOrder = 0
OnClick = Add_valueClick
Glyph.Data = {
DE010000424DDE01000000000000760000002800000024000000120000000100
0400000000006801000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333333333333333330000333333333333333333333333F33333333333
00003333344333333333333333388F3333333333000033334224333333333333
338338F3333333330000333422224333333333333833338F3333333300003342
222224333333333383333338F3333333000034222A22224333333338F338F333
8F33333300003222A3A2224333333338F3838F338F33333300003A2A333A2224
33333338F83338F338F33333000033A33333A222433333338333338F338F3333
0000333333333A222433333333333338F338F33300003333333333A222433333
333333338F338F33000033333333333A222433333333333338F338F300003333
33333333A222433333333333338F338F00003333333333333A22433333333333
3338F38F000033333333333333A223333333333333338F830000333333333333
333A333333333333333338330000333333333333333333333333333333333333
0000}
NumGlyphs = 2
end
object ad_value: TMaskEdit
Left = 79
Top = 26
Width = 98
Height = 21
MaxLength = 4
TabOrder = 1
Text = '02'
end
object addvalue: TRadioButton
Left = 32
Top = 64
Width = 49
Height = 17
Caption = #20943#20540
Checked = True
TabOrder = 2
TabStop = True
end
object delvalue: TRadioButton
Left = 32
Top = 88
Width = 57
Height = 17
Caption = #22686#20540
TabOrder = 3
end
end
object InitICcard_MSComm: TMSComm
Left = 368
Top = -8
Width = 32
Height = 32
OnComm = InitICcard_MSCommComm
ControlData = {
2143341208000000ED030000ED03000001568A64000006000000010000040000
00020000802500000000080000000000000000003F00000001000000}
end
object Panel1: TPanel
Left = 14
Top = 16
Width = 547
Height = 57
Color = cl3DLight
Font.Charset = GB2312_CHARSET
Font.Color = clOlive
Font.Height = -29
Font.Name = #21326#25991#26032#39759
Font.Style = []
ParentFont = False
TabOrder = 10
object Tishi: TStaticText
Left = 40
Top = 14
Width = 62
Height = 34
Caption = #25552#31034
Color = cl3DLight
ParentColor = False
TabOrder = 0
end
end
object select_work: TBitBtn
Left = 569
Top = 16
Width = 128
Height = 57
Caption = #19982#21345#36890#35759
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -29
Font.Name = #21326#25991#34892#26999
Font.Style = []
ParentFont = False
TabOrder = 11
OnClick = select_workClick
end
object GroupBox10: TGroupBox
Left = 24
Top = 536
Width = 673
Height = 81
Caption = #35774#22791#35748#35777#23494#38053#35013#36733
TabOrder = 12
object input_key_load: TEdit
Left = 304
Top = 48
Width = 121
Height = 21
MaxLength = 12
TabOrder = 0
Text = '666666666666'
end
object key_savesecotor: TComboBox
Left = 104
Top = 24
Width = 113
Height = 21
ItemHeight = 13
ItemIndex = 0
TabOrder = 1
Text = '0'
Items.Strings = (
'0'
'1'
'2'
'3'
'4'
'5'
'6'
'7'
'8'
'9'
'a'
'b'
'c'
'd'
'e'
'f')
end
object load: TBitBtn
Left = 520
Top = 32
Width = 75
Height = 33
Caption = #35013#36733
Default = True
TabOrder = 2
OnClick = loadClick
Glyph.Data = {
DE010000424DDE01000000000000760000002800000024000000120000000100
0400000000006801000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333333333333333330000333333333333333333333333F33333333333
00003333344333333333333333388F3333333333000033334224333333333333
338338F3333333330000333422224333333333333833338F3333333300003342
222224333333333383333338F3333333000034222A22224333333338F338F333
8F33333300003222A3A2224333333338F3838F338F33333300003A2A333A2224
33333338F83338F338F33333000033A33333A222433333338333338F338F3333
0000333333333A222433333333333338F338F33300003333333333A222433333
333333338F338F33000033333333333A222433333333333338F338F300003333
33333333A222433333333333338F338F00003333333333333A22433333333333
3338F38F000033333333333333A223333333333333338F830000333333333333
333A333333333333333338330000333333333333333333333333333333333333
0000}
NumGlyphs = 2
end
object StaticText6: TStaticText
Left = 32
Top = 24
Width = 64
Height = 17
Caption = #23384#25918#23494#38053#21306
TabOrder = 3
end
object StaticText7: TStaticText
Left = 32
Top = 56
Width = 52
Height = 17
Caption = #23494#38053#31867#22411
TabOrder = 4
end
object StaticText8: TStaticText
Left = 328
Top = 20
Width = 52
Height = 17
Caption = #36755#20837#23494#38053
TabOrder = 5
end
object keya_load: TRadioButton
Left = 104
Top = 56
Width = 57
Height = 17
Caption = #23494#38053'A'
Checked = True
TabOrder = 6
TabStop = True
end
object keyb_load: TRadioButton
Left = 168
Top = 56
Width = 57
Height = 17
Caption = #23494#38053'B'
TabOrder = 7
end
end
object Send_Message: TButton
Left = 704
Top = 80
Width = 35
Height = 25
Caption = 'send'
TabOrder = 13
OnClick = Send_MessageClick
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -