srvmainunit.dfm

使用与中国移动CMPP2.0的短信网关

object smsSrvForm: TsmsSrvForm
  Left = 205
  Top = 191
  Width = 734
  Height = 493
  Caption = #26032#30086#31227#21160#30701#20449#31243#24207#65288#21457#36865#31243#24207#65289
  Color = clBtnFace
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 12
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 726
    Height = 59
    Align = alTop
    AutoSize = True
    Caption = 'Panel1'
    TabOrder = 0
    object CoolBar1: TCoolBar
      Left = 1
      Top = 1
      Width = 724
      Height = 57
      AutoSize = True
      Bands = <
        item
          Control = ToolBar1
          ImageIndex = -1
          MinHeight = 53
          Width = 720
        end>
      object ToolBar1: TToolBar
        Left = 9
        Top = 0
        Width = 707
        Height = 53
        AutoSize = True
        ButtonHeight = 51
        ButtonWidth = 55
        Caption = 'ToolBar1'
        Flat = True
        Images = ImageList1
        ParentShowHint = False
        ShowCaptions = True
        ShowHint = True
        TabOrder = 0
        object ToolButton1: TToolButton
          Left = 0
          Top = 0
          Hint = #25163#24037#21457#36865
          AutoSize = True
          Caption = #21457#36865#27979#35797
          ImageIndex = 0
          ParentShowHint = False
          ShowHint = True
          OnClick = ToolButton1Click
        end
        object tlbLook: TToolButton
          Left = 59
          Top = 0
          AutoSize = True
          Caption = #25968#25454#35266#23519
          ImageIndex = 1
          OnClick = tlbLookClick
        end
        object tlbLookMiss: TToolButton
          Left = 118
          Top = 0
          AutoSize = True
          Caption = #24453#21457#30701#20449
          ImageIndex = 2
          OnClick = tlbLookMissClick
        end
        object ToolButton2: TToolButton
          Left = 177
          Top = 0
          Width = 8
          Caption = 'ToolButton2'
          ImageIndex = 6
          Style = tbsSeparator
        end
        object tlbBackup: TToolButton
          Left = 185
          Top = 0
          Caption = #36864#20986#31995#32479
          ImageIndex = 3
          OnClick = tlbBackupClick
        end
      end
    end
  end
  object PC1: TPageControl
    Left = 0
    Top = 59
    Width = 726
    Height = 400
    ActivePage = TabSheet1
    Align = alClient
    TabIndex = 0
    TabOrder = 1
    object TabSheet1: TTabSheet
      Caption = #21457#36865#27979#35797
      object PnlSingle: TPanel
        Left = 8
        Top = 24
        Width = 241
        Height = 297
        TabOrder = 0
        Visible = False
        object Label1: TLabel
          Left = 24
          Top = 32
          Width = 65
          Height = 13
          AutoSize = False
          Caption = #28040#24687#20869#23481
        end
        object Label3: TLabel
          Left = 24
          Top = 160
          Width = 89
          Height = 13
          AutoSize = False
          Caption = #30446#30340#25163#26426#21495
        end
        object MsgContent: TMemo
          Left = 24
          Top = 56
          Width = 185
          Height = 89
          ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
          MaxLength = 160
          TabOrder = 0
        end
        object BSubmit: TButton
          Left = 32
          Top = 216
          Width = 75
          Height = 25
          Caption = #21457#36865
          TabOrder = 1
          OnClick = BSubmitClick
        end
        object BClose: TButton
          Left = 128
          Top = 216
          Width = 75
          Height = 25
          Caption = #20851#38381
          Default = True
          TabOrder = 2
          OnClick = BCloseClick
        end
        object MobileNumber: TMaskEdit
          Left = 24
          Top = 184
          Width = 98
          Height = 20
          EditMask = '###########;1;_'
          ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
          MaxLength = 11
          TabOrder = 3
          Text = '13899930321'
        end
      end
      object Memo1: TMemo
        Left = 456
        Top = 210
        Width = 185
        Height = 51
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        Lines.Strings = (
          'Memo1')
        TabOrder = 1
        Visible = False
      end
    end
    object TabSheet2: TTabSheet
      Caption = #25968#25454#35266#23519
      ImageIndex = 1
      object Splitter1: TSplitter
        Left = 0
        Top = 183
        Width = 718
        Height = 3
        Cursor = crVSplit
        Align = alTop
      end
      object MOutDat: TMemo
        Left = 0
        Top = 41
        Width = 718
        Height = 142
        Align = alTop
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        ReadOnly = True
        ScrollBars = ssBoth
        TabOrder = 0
      end
      object MInDat: TMemo
        Left = 0
        Top = 186
        Width = 718
        Height = 187
        Align = alClient
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        ReadOnly = True
        ScrollBars = ssVertical
        TabOrder = 1
      end
      object Panel2: TPanel
        Left = 0
        Top = 0
        Width = 718
        Height = 41
        Align = alTop
        BevelOuter = bvNone
        TabOrder = 2
        object BtClearDat: TButton
          Left = 240
          Top = 6
          Width = 75
          Height = 25
          Caption = #28165#38500#25968#25454
          TabOrder = 0
          OnClick = BtClearDatClick
        end