umain.dfm

访问西门子手机,可发送AT指令,并进行解码和加码.

object MainForm: TMainForm
  Left = 241
  Top = 182
  Caption = 'MainForm'
  ClientHeight = 446
  ClientWidth = 688
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object memoLog: TMemo
    Left = 24
    Top = 112
    Width = 489
    Height = 297
    Lines.Strings = (
      'memoLog')
    TabOrder = 0
  end
  object btnOpen: TButton
    Left = 544
    Top = 112
    Width = 97
    Height = 25
    Caption = 'btnOpen'
    TabOrder = 1
    OnClick = btnOpenClick
  end
  object btnClose: TButton
    Left = 544
    Top = 152
    Width = 97
    Height = 25
    Caption = 'btnClose'
    TabOrder = 2
    OnClick = btnCloseClick
  end
  object edtCommand: TEdit
    Left = 24
    Top = 80
    Width = 481
    Height = 21
    TabOrder = 3
    Text = 'edtCommand'
  end
  object btnTestCmd: TButton
    Left = 544
    Top = 72
    Width = 89
    Height = 25
    Caption = 'btnTestCmd'
    TabOrder = 4
    OnClick = btnTestCmdClick
  end
end