unitsendmsg.dfm

手机短信发送源码

object FormSendMsg: TFormSendMsg
  Left = 320
  Top = 200
  BorderStyle = bsDialog
  Caption = #21457#36865#30701#20449
  ClientHeight = 295
  ClientWidth = 371
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 12
  object Label1: TLabel
    Left = 16
    Top = 6
    Width = 78
    Height = 12
    Caption = #21457#36865#30701#20449#20869#23481':'
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Label2: TLabel
    Left = 16
    Top = 175
    Width = 54
    Height = 12
    Caption = #25163#26426#21495#30721':'
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Label3: TLabel
    Left = 16
    Top = 218
    Width = 228
    Height = 12
    Caption = #27880':'#22914#26524#26159#22269#38469#25163#26426#21495#30721#65292#35831#22312#21069#20889#8220'+'#8221#12290
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Label4: TLabel
    Left = 15
    Top = 157
    Width = 336
    Height = 12
    Caption = #27880':'#21457#36865#20869#23481#26368#22810'70'#20010#27721#23383#25110'180'#20010#33521#25991#65292#36229#38271#26102#33258#21160#20998#27573#21457#36865#12290
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Memo1: TMemo
    Left = 16
    Top = 23
    Width = 335
    Height = 128
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 0
    OnChange = Memo1Change
  end
  object Edit1: TEdit
    Left = 16
    Top = 188
    Width = 251
    Height = 20
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 1
  end
  object BitBtn2: TBitBtn
    Left = 57
    Top = 259
    Width = 82
    Height = 23
    Caption = #21457'  '#36865
    Default = True
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 2
    OnClick = BitBtn2Click
    NumGlyphs = 2
  end
  object BitBtn3: TBitBtn
    Left = 239
    Top = 259
    Width = 82
    Height = 23
    Cancel = True
    Caption = #21462'  '#28040
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ModalResult = 7
    ParentFont = False
    TabOrder = 3
    NumGlyphs = 2
  end
  object CheckAutoDisplay: TCheckBox
    Left = 18
    Top = 237
    Width = 78
    Height = 13
    Caption = #20813#25552#30701#20449
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 4
  end
  object CheckReturnReceipt: TCheckBox
    Left = 100
    Top = 237
    Width = 111
    Height = 13
    Caption = #23545#26041#25910#21040#21518#22238#25191
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 5
  end
end