fmain.~dfm

This source code. simple tools for huawei CDMA platform function : read code write code read sp

object Main: TMain
  Left = 643
  Top = 76
  Width = 610
  Height = 638
  BiDiMode = bdLeftToRight
  BorderStyle = bsSizeToolWin
  Caption = 'Huawei CDMA'
  Color = cl3DLight
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  ParentBiDiMode = False
  Position = poDesktopCenter
  Scaled = False
  OnClose = FormClose
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object GroupBox1: TGroupBox
    Left = 0
    Top = 0
    Width = 601
    Height = 569
    Color = cl3DLight
    ParentColor = False
    TabOrder = 0
    object GroupBox2: TGroupBox
      Left = 8
      Top = 512
      Width = 161
      Height = 49
      Caption = 'Com Settings'
      TabOrder = 0
      object Label1: TLabel
        Left = 8
        Top = 16
        Width = 25
        Height = 13
        Caption = 'Com'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object cmb_com: TComboBox
        Left = 40
        Top = 16
        Width = 113
        Height = 21
        ItemHeight = 13
        TabOrder = 0
        OnChange = COM_Change
        OnSelect = ComBo_INTERFACESelect
      end
    end
    object grp_services: TGroupBox
      Left = 8
      Top = 16
      Width = 161
      Height = 305
      Caption = 'Services'
      TabOrder = 1
      object btn_info: TButton
        Left = 8
        Top = 232
        Width = 65
        Height = 17
        Caption = 'Info'
        TabOrder = 0
        OnClick = btn_infoClick
      end
      object btn_DM: TButton
        Left = 8
        Top = 280
        Width = 65
        Height = 17
        Caption = 'DM Mode'
        TabOrder = 1
        OnClick = btn_DMClick
      end
      object btn_offline_d: TButton
        Left = 88
        Top = 256
        Width = 65
        Height = 17
        Caption = 'Offline - D'
        TabOrder = 2
        OnClick = btn_offline_dClick
      end
      object btn_restart: TButton
        Left = 8
        Top = 256
        Width = 65
        Height = 17
        Caption = 'Restart'
        TabOrder = 3
        OnClick = btn_restartClick
      end
      object btn_wd: TButton
        Left = 88
        Top = 280
        Width = 65
        Height = 17
        Caption = 'WD'
        TabOrder = 4
        OnClick = btn_wdClick
      end
      object Lock: TGroupBox
        Left = 8
        Top = 16
        Width = 145
        Height = 65
        Caption = 'Lock'
        TabOrder = 5
        object User_code: TEdit
          Left = 80
          Top = 28
          Width = 49
          Height = 21
          MaxLength = 4
          TabOrder = 0
        end
        object btn_lock: TButton
          Left = 8
          Top = 16
          Width = 57
          Height = 17
          Caption = 'Rd Lock'
          TabOrder = 1
          OnClick = btn_lockClick
        end
        object btn_wr_lock: TButton
          Left = 8
          Top = 40
          Width = 57
          Height = 17
          Caption = 'Wr Lock'
          TabOrder = 2
          OnClick = btn_wr_lockClick
        end
      end
      object GroupBox7: TGroupBox
        Left = 8
        Top = 88
        Width = 145
        Height = 65
        Caption = 'SPC'
        TabOrder = 6
        object btn_rd_spc: TButton
          Left = 8
          Top = 16
          Width = 57
          Height = 17
          Caption = 'Read SPC '
          TabOrder = 0
          OnClick = btn_rd_spcClick
        end
        object btn_wr_spc: TButton
          Left = 8
          Top = 40
          Width = 57
          Height = 17
          Caption = 'Write SPC'
          TabOrder = 1
          OnClick = btn_wr_spcClick
        end
        object SPC: TEdit
          Left = 80
          Top = 24
          Width = 49
          Height = 21
          MaxLength = 6
          TabOrder = 2
        end
      end
    end
    object Tab_Info: TPageControl
      Left = 176
      Top = 16
      Width = 417
      Height = 545
      ActivePage = TabSheet1
      TabOrder = 2
      object TabSheet1: TTabSheet
        Caption = 'Info'
        object Memo: TMemo
          Left = 0
          Top = 4
          Width = 409
          Height = 509
          Color = clWindowText
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clYellow
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          ReadOnly = True
          ScrollBars = ssVertical
          TabOrder = 0
        end
      end
    end
  end
  object ProgressBar: TProgressBar
    Left = 0
    Top = 568
    Width = 601
    Height = 24
    TabOrder = 1
  end
  object StatusBar: TStatusBar
    Left = 0
    Top = 592
    Width = 602
    Height = 19
    Panels = <
      item
        Text = 'Status '
        Width = 300
      end
      item
        Alignment = taRightJustify
        Text = 'Time'
        Width = 50
      end>
    SizeGrip = False
  end
  object Timer: TTimer
    Interval = 100
    Left = 432
    Top = 296
  end
  object OpenDialog: TOpenDialog
    Left = 472
    Top = 296
  end
end