unit3.~dfm

利用delphi编写的手机短信发送程序

object Form3: TForm3
  Left = 298
  Top = 161
  BorderIcons = [biSystemMenu]
  BorderStyle = bsDialog
  Caption = #21442#25968#35774#32622
  ClientHeight = 187
  ClientWidth = 281
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poOwnerFormCenter
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Button1: TButton
    Left = 56
    Top = 152
    Width = 57
    Height = 25
    Caption = #30830#35748
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 0
    OnClick = Button1Click
  end
  object Button2: TButton
    Left = 176
    Top = 152
    Width = 57
    Height = 25
    Caption = #21462#28040
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 1
    OnClick = Button2Click
  end
  object GroupBox1: TGroupBox
    Left = 24
    Top = 8
    Width = 233
    Height = 137
    TabOrder = 2
    object Label2: TLabel
      Left = 104
      Top = 16
      Width = 36
      Height = 12
      Caption = #36895#29575#65306
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label3: TLabel
      Left = 32
      Top = 16
      Width = 36
      Height = 12
      Caption = #31471#21475#65306
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label1: TLabel
      Left = 32
      Top = 72
      Width = 108
      Height = 12
      Caption = #21457#36865#22833#36133#37325#35797#27425#25968#65306
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object ComboBox3: TComboBox
      Left = 32
      Top = 32
      Width = 65
      Height = 21
      ItemHeight = 13
      TabOrder = 0
      Text = '1'
      Items.Strings = (
        '1'
        '2'
        '3'
        '4')
    end
    object ComboBox2: TComboBox
      Left = 104
      Top = 32
      Width = 97
      Height = 21
      ItemHeight = 13
      TabOrder = 1
      Text = '19200'
      Items.Strings = (
        '300'
        '1200'
        '2400'
        '4800'
        '9600'
        '19200'
        '38400')
    end
    object Edit1: TEdit
      Left = 32
      Top = 96
      Width = 73
      Height = 21
      TabOrder = 2
      Text = '3'
    end
  end
end