?? unit1.dfm
字號(hào):
object Form1: TForm1
Left = 224
Top = 82
Width = 870
Height = 429
Caption = 'GSM Modem '#27979#35797#25910#21457
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
object GroupBox1: TGroupBox
Left = 8
Top = 8
Width = 297
Height = 385
Caption = #21457#36865
TabOrder = 0
object Label1: TLabel
Left = 16
Top = 16
Width = 89
Height = 16
AutoSize = False
Caption = #25509#25910#26041#21495#30721#65306
Font.Charset = DEFAULT_CHARSET
Font.Color = clRed
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label2: TLabel
Left = 16
Top = 48
Width = 73
Height = 16
AutoSize = False
Caption = #20449#24687#20013#24515#65306
Font.Charset = DEFAULT_CHARSET
Font.Color = clRed
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label3: TLabel
Left = 16
Top = 88
Width = 73
Height = 16
AutoSize = False
Caption = #21457#36865#20869#23481#65306
Font.Charset = DEFAULT_CHARSET
Font.Color = clRed
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label7: TLabel
Left = 16
Top = 343
Width = 73
Height = 16
AutoSize = False
Caption = #36873#25321#20018#21475#65306
Font.Charset = DEFAULT_CHARSET
Font.Color = clRed
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label8: TLabel
Left = 58
Top = 304
Width = 135
Height = 23
AutoSize = False
Caption = #26410#36830#25509'......'
Font.Charset = DEFAULT_CHARSET
Font.Color = clRed
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object SendMsg: TMemo
Left = 16
Top = 120
Width = 257
Height = 177
Lines.Strings = (
#20869#23481)
TabOrder = 0
end
object RecNum: TEdit
Left = 112
Top = 15
Width = 161
Height = 21
TabOrder = 1
Text = '13828936386'
end
object InfoCenter: TEdit
Left = 112
Top = 45
Width = 161
Height = 21
Color = clScrollBar
Enabled = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clRed
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 2
end
object BtnSend: TButton
Left = 200
Top = 88
Width = 75
Height = 25
Caption = #21457#36865
TabOrder = 3
OnClick = BtnSendClick
end
object ComboBox1: TComboBox
Left = 96
Top = 341
Width = 89
Height = 21
Style = csDropDownList
ItemHeight = 13
ItemIndex = 7
TabOrder = 4
Text = 'COM8'
Items.Strings = (
'COM1'
'COM2'
'COM3'
'COM4'
'COM5'
'COM6'
'COM7'
'COM8'
'COM9')
end
object BtnOpen: TButton
Left = 200
Top = 323
Width = 73
Height = 25
Caption = #25171#24320
TabOrder = 5
OnClick = BtnOpenClick
end
object BtnClose: TButton
Left = 200
Top = 355
Width = 73
Height = 25
Caption = #20851#38381
TabOrder = 6
OnClick = BtnCloseClick
end
end
object GroupBox2: TGroupBox
Left = 328
Top = 8
Width = 529
Height = 385
Caption = #25509#25910
TabOrder = 1
object Label4: TLabel
Left = 16
Top = 16
Width = 89
Height = 16
AutoSize = False
Caption = #21457#36865#26041#21495#30721#65306
Font.Charset = DEFAULT_CHARSET
Font.Color = clRed
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label5: TLabel
Left = 16
Top = 48
Width = 73
Height = 16
AutoSize = False
Caption = #21457#36865#26102#38388#65306
Font.Charset = DEFAULT_CHARSET
Font.Color = clRed
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label6: TLabel
Left = 16
Top = 88
Width = 73
Height = 16
AutoSize = False
Caption = #21457#36865#20869#23481#65306
Font.Charset = DEFAULT_CHARSET
Font.Color = clRed
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object RecMsg: TMemo
Left = 16
Top = 120
Width = 257
Height = 177
TabOrder = 0
end
object SendNum: TEdit
Left = 112
Top = 15
Width = 161
Height = 21
TabOrder = 1
Text = 'SendNum'
end
object InfoCenter2: TEdit
Left = 112
Top = 45
Width = 161
Height = 21
TabOrder = 2
Text = 'InfoCenter2'
end
object BtnRce: TButton
Left = 192
Top = 320
Width = 75
Height = 25
Caption = #35835#21462
Enabled = False
TabOrder = 3
OnClick = BtnRceClick
end
object ListBox1: TListBox
Left = 288
Top = 16
Width = 225
Height = 361
ItemHeight = 13
TabOrder = 4
OnMouseDown = ListBox1MouseDown
end
object Button2: TButton
Left = 192
Top = 352
Width = 75
Height = 25
Caption = #21047#26032#21015#34920
TabOrder = 5
OnClick = Button2Click
end
object Button3: TButton
Left = 200
Top = 88
Width = 75
Height = 25
Caption = '2'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -32
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 6
OnClick = Button3Click
end
end
object MSC: TMSComm
Left = 301
Top = 24
Width = 32
Height = 32
OnComm = MSCComm
ControlData = {
2143341208000000ED030000ED03000001568A64000006000000080000040000
00020000802500000000080000000000000000003F00000001000000}
end
object Button1: TButton
Left = 440
Top = 96
Width = 75
Height = 25
Caption = '1'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -32
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 3
OnClick = Button1Click
end
object Timer1: TTimer
Enabled = False
Interval = 10000
OnTimer = Timer1Timer
Left = 304
Top = 64
end
end
?? 快捷鍵說(shuō)明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號(hào)
Ctrl + =
減小字號(hào)
Ctrl + -