ffrmmain.dfm

SMS短信收发纯Delphi开发VCL SMS短信收发纯Delphi开发VCL

object frmMain: TfrmMain
  Left = 186
  Top = 190
  BorderStyle = bsDialog
  Caption = #38431#21015#20013#30701#20449#25968#37327
  ClientHeight = 388
  ClientWidth = 573
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  PixelsPerInch = 96
  TextHeight = 12
  object Label6: TLabel
    Left = 40
    Top = 103
    Width = 48
    Height = 12
    Caption = #21457#36865#25163#26426
  end
  object Label7: TLabel
    Left = 176
    Top = 103
    Width = 48
    Height = 12
    Caption = #30701#20449#20869#23481
  end
  object Label1: TLabel
    Left = 21
    Top = 63
    Width = 48
    Height = 12
    Caption = #30701#20449#20013#24515
  end
  object Label2: TLabel
    Left = 45
    Top = 25
    Width = 24
    Height = 12
    Caption = #31471#21475
  end
  object Label3: TLabel
    Left = 60
    Top = 126
    Width = 24
    Height = 12
    Caption = #25351#20196
  end
  object Label4: TLabel
    Left = 177
    Top = 25
    Width = 24
    Height = 12
    Caption = #36895#29575
  end
  object btnOpenComm: TButton
    Left = 38
    Top = 158
    Width = 75
    Height = 25
    Caption = #25171#24320#31471#21475
    TabOrder = 0
    OnClick = btnOpenCommClick
  end
  object btnSendSMS: TButton
    Left = 352
    Top = 92
    Width = 75
    Height = 25
    Caption = #21457#36865#30701#20449
    TabOrder = 1
    OnClick = btnSendSMSClick
  end
  object btnCloseComm: TButton
    Left = 123
    Top = 159
    Width = 75
    Height = 25
    Caption = #20851#38381#31471#21475
    TabOrder = 2
    OnClick = btnCloseCommClick
  end
  object edtPhone: TEdit
    Left = 95
    Top = 95
    Width = 73
    Height = 20
    TabOrder = 3
    Text = '13386429013'
  end
  object edtSMS: TEdit
    Left = 232
    Top = 95
    Width = 121
    Height = 20
    TabOrder = 4
    Text = #27979#35797#30701#20449
  end
  object memResponses: TMemo
    Left = 0
    Top = 200
    Width = 573
    Height = 188
    Align = alBottom
    ScrollBars = ssBoth
    TabOrder = 5
  end
  object cmbComm: TComboBox
    Left = 74
    Top = 22
    Width = 85
    Height = 20
    ItemHeight = 12
    TabOrder = 6
    Text = 'COM1'
    Items.Strings = (
      'COM1'
      'COM2'
      'COM3'
      'COM4'
      'COM5'
      'COM6'
      'COM7'
      'COM8'
      'COM9')
  end
  object edtATCommand: TEdit
    Left = 95
    Top = 122
    Width = 258
    Height = 20
    TabOrder = 7
    Text = 'AT'
  end
  object btnSendATCommand: TButton
    Left = 352
    Top = 122
    Width = 75
    Height = 20
    Caption = #21457#36865#21629#20196
    TabOrder = 8
    OnClick = btnSendATCommandClick
  end
  object Button1: TButton
    Left = 211
    Top = 158
    Width = 117
    Height = 25
    Caption = #35774#32622#30701#20449#20013#24515
    TabOrder = 9
    OnClick = Button1Click
  end
  object cmbSMSCenter: TComboBox
    Left = 78
    Top = 59
    Width = 127
    Height = 20
    ItemHeight = 12
    TabOrder = 10
    Text = '8613010166500'
    Items.Strings = (
      '8613010166500'
      '8613800532500')
  end
  object cmbBaudRate: TComboBox
    Left = 208
    Top = 22
    Width = 85
    Height = 20
    ItemHeight = 12
    TabOrder = 11
    Text = '9600'
    Items.Strings = (
      '110'
      '300'
      '1200'
      '2400'
      '4800'
      '9600'
      '19200'
      '38400'
      '57600'
      '115200'
      '230400'
      '460800'
      '921600')
  end
  object Button2: TButton
    Left = 342
    Top = 156
    Width = 111
    Height = 25
    Caption = #38431#21015#20013#30701#20449#25968#37327
    TabOrder = 12
    OnClick = Button2Click
  end
  object Button3: TButton
    Left = 430
    Top = 92
    Width = 123
    Height = 25
    Caption = #21152#20837#21040#24453#21457#30701#20449#38431#21015
    TabOrder = 13
    OnClick = Button3Click
  end
  object chkOpenSendQueue: TCheckBox
    Left = 446
    Top = 57
    Width = 97
    Height = 17
    Caption = #21551#21160#21457#36865#36827#31243
    TabOrder = 14
    OnClick = chkOpenSendQueueClick
  end
  object Button4: TButton
    Left = 428
    Top = 120
    Width = 123
    Height = 25
    Caption = #21152#20837#21040#24453#21457#21629#20196#38431#21015
    TabOrder = 15
    OnClick = Button4Click
  end
  object Button5: TButton
    Left = 456
    Top = 155
    Width = 111
    Height = 25
    Caption = #38431#21015#20013#21629#20196#25968#37327
    TabOrder = 16
    OnClick = Button5Click
  end
end