📄 mainform.dfm
字号:
object Main: TMain
Left = 354
Top = 156
Width = 513
Height = 485
Caption = #35746#36141#20851#31995#25506#27979#22120
Color = cl3DLight
TransparentColorValue = clWindow
Ctl3D = False
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Courier New'
Font.Style = []
OldCreateOrder = False
PixelsPerInch = 96
TextHeight = 14
object Panel1: TPanel
Left = 0
Top = 0
Width = 505
Height = 81
Align = alTop
BevelOuter = bvNone
Ctl3D = False
ParentColor = True
ParentCtl3D = False
TabOrder = 0
object Label1: TLabel
Left = 16
Top = 16
Width = 49
Height = 14
Caption = 'Http://'
end
object Label2: TLabel
Left = 16
Top = 50
Width = 56
Height = 14
Caption = 'MimeType'
end
object Edit1: TEdit
Left = 76
Top = 14
Width = 277
Height = 20
ParentColor = True
TabOrder = 0
Text = '61.145.119.102:8080/dice/provision.jsp'
end
object Button1: TButton
Left = 376
Top = 44
Width = 105
Height = 25
Caption = 'Send Request'
TabOrder = 1
OnClick = Button1Click
end
object CbSave: TCheckBox
Left = 376
Top = 16
Width = 101
Height = 17
Alignment = taLeftJustify
Caption = 'save to file'
TabOrder = 2
end
object Edit2: TEdit
Left = 76
Top = 48
Width = 277
Height = 20
ParentColor = True
TabOrder = 3
Text = 'application/x-www-form-urlencoded'
end
end
object Panel2: TPanel
Left = 0
Top = 81
Width = 505
Height = 176
Align = alTop
BevelOuter = bvNone
ParentColor = True
TabOrder = 1
object GroupBox1: TGroupBox
Left = 0
Top = 0
Width = 505
Height = 176
Align = alClient
BiDiMode = bdLeftToRight
Caption = #35746#36141'XML'#25968#25454#21253
Ctl3D = False
ParentBiDiMode = False
ParentCtl3D = False
TabOrder = 0
object MeSend: TMemo
Left = 1
Top = 15
Width = 503
Height = 160
Align = alClient
BevelInner = bvNone
BevelOuter = bvNone
BorderStyle = bsNone
Lines.Strings = (
'<?xml version = "1.0"?>'
'<misc_command version="1.6">'
' <command_name>provision</command_name>'
' <command_data_block>'
' <action_id>1</action_id>'
' <service_id>04020054</service_id>'
' <mid>00116052717414</mid>'
' <mobile_id>13560216841</mobile_id>'
' <access_mode>2</access_mode>'
' </command_data_block>'
'</misc_command>')
ParentColor = True
TabOrder = 0
end
end
end
object Panel3: TPanel
Left = 0
Top = 257
Width = 505
Height = 201
Align = alClient
BevelOuter = bvNone
ParentColor = True
TabOrder = 2
object GroupBox2: TGroupBox
Left = 0
Top = 0
Width = 505
Height = 201
Align = alClient
Caption = #36820#22238#25968#25454
Ctl3D = False
ParentCtl3D = False
TabOrder = 0
object MeReceive: TMemo
Left = 1
Top = 15
Width = 503
Height = 185
TabStop = False
Align = alClient
BevelInner = bvNone
BevelOuter = bvNone
BorderStyle = bsNone
Lines.Strings = (
'action_id 1:'#24320#36890#26381#21153
' 2:'#20572#27490#26381#21153
' 3:'#28608#27963#26381#21153
' 4:'#26242#20572#26381#21153
'service_id '#26412#26381#21153'id'
'mid '#29992#25143#30340#26790#32593'id'
'mobile_id '#25163#26426#21495#30721
'access_mode 1:web'
' 2:wap'
' 3:sms')
ParentColor = True
TabOrder = 0
end
end
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -