untmain.~dfm

1、通过串口连接手机或短信终端发送短信； 2、内置Access数据库

    object Label15: TLabel
      Left = 8
      Top = 347
      Width = 39
      Height = 13
      Caption = #32452#21035#65306
    end
    object Label16: TLabel
      Left = 264
      Top = 347
      Width = 39
      Height = 13
      Caption = #25163#26426#65306
    end
    object Label17: TLabel
      Left = 8
      Top = 504
      Width = 65
      Height = 13
      Caption = #20309#26102#21457#36865#65306
    end
    object Label18: TLabel
      Left = 192
      Top = 444
      Width = 39
      Height = 13
      Caption = #27425#25968#65306
    end
    object Label19: TLabel
      Left = 8
      Top = 443
      Width = 52
      Height = 13
      Caption = #21457#36865#32773#65306
    end
    object Label20: TLabel
      Left = 264
      Top = 444
      Width = 39
      Height = 13
      Caption = #23383#25968#65306
    end
    object lblCount: TLabel
      Left = 304
      Top = 444
      Width = 7
      Height = 13
      Caption = '0'
    end
    object Label21: TLabel
      Left = 336
      Top = 444
      Width = 112
      Height = 13
      Caption = #65288#38480'70'#20010#27721#23383'/'#26465#65289
    end
    object DBGridEh2: TDBGridEh
      Left = 0
      Top = 0
      Width = 449
      Height = 161
      DataSource = DM1.dsHuman
      Flat = True
      FooterColor = clWindow
      FooterFont.Charset = DEFAULT_CHARSET
      FooterFont.Color = clWindowText
      FooterFont.Height = -13
      FooterFont.Name = #23435#20307
      FooterFont.Style = []
      Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit]
      OptionsEh = [dghFixed3D, dghHighlightFocus, dghClearSelection]
      TabOrder = 0
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -13
      TitleFont.Name = #23435#20307
      TitleFont.Style = []
      OnCellClick = DBGridEh2CellClick
      Columns = <
        item
          EditButtons = <>
          FieldName = #22995#21517
          Footers = <>
          Width = 80
        end
        item
          EditButtons = <>
          FieldName = #20851#38190#35789
          Footers = <>
          Width = 100
        end
        item
          EditButtons = <>
          FieldName = #24615#21035
          Footers = <>
          Width = 30
        end
        item
          EditButtons = <>
          FieldName = #20986#29983#26085#26399
          Footers = <>
          Width = 100
        end
        item
          EditButtons = <>
          FieldName = #22478#24066
          Footers = <>
          Width = 60
        end
        item
          EditButtons = <>
          FieldName = #37038#32534
          Footers = <>
        end
        item
          EditButtons = <>
          FieldName = #22320#22336
          Footers = <>
          Width = 100
        end
        item
          EditButtons = <>
          FieldName = #20844#21496
          Footers = <>
          Width = 100
        end
        item
          EditButtons = <>
          FieldName = #32844#21153
          Footers = <>
          Width = 50
        end
        item
          EditButtons = <>
          FieldName = #30005#23376#37038#31665
          Footers = <>
          Width = 100
        end
        item
          EditButtons = <>
          FieldName = #36890#35759#26041#24335
          Footers = <>
          Width = 200
        end
        item
          EditButtons = <>
          FieldName = #30005#35805
          Footers = <>
          Width = 100
        end
        item
          EditButtons = <>
          FieldName = #25163#26426
          Footers = <>
          Width = 100
        end>
    end
    object EdtName: TEdit
      Left = 48
      Top = 176
      Width = 113
      Height = 21
      BevelInner = bvNone
      BevelOuter = bvNone
      BorderStyle = bsNone
      TabOrder = 1
    end
    object DatePickerSend: TDateTimePicker
      Left = 72
      Top = 500
      Width = 97
      Height = 20
      Date = 37791.406644456000000000
      Format = 'yyyy-MM-dd'
      Time = 37791.406644456000000000
      TabOrder = 2
    end
    object TimePickerSend: TDateTimePicker
      Left = 175
      Top = 500
      Width = 82
      Height = 20
      Date = 37780.803808935200000000
      Format = 'HH:mm:ss'
      Time = 37780.803808935200000000
      Kind = dtkTime
      TabOrder = 3
    end
    object MemoSend: TMemo
      Left = 8
      Top = 368
      Width = 441
      Height = 65
      Ctl3D = True
      ParentCtl3D = False
      TabOrder = 4
      OnChange = MemoSendChange
    end
    object EdtSendTimes: TEdit
      Left = 232
      Top = 440
      Width = 25
      Height = 21
      Ctl3D = True
      ParentCtl3D = False
      TabOrder = 5
      Text = '1'
    end
    object CheckBoxReqStatus: TCheckBox
      Left = 8
      Top = 472
      Width = 113
      Height = 17
      Caption = #35831#27714#22238#29366#24577#25253#21578
      Checked = True
      Enabled = False
      State = cbChecked
      TabOrder = 6
    end
    object CheckBoxCrypt: TCheckBox
      Left = 144
      Top = 472
      Width = 113
      Height = 17
      Caption = #21457#36865#26102#37319#29992#23494#25991
      Enabled = False
      TabOrder = 7
    end
    object Button2: TButton
      Left = 264
      Top = 496
      Width = 89
      Height = 25
      Caption = #23450#26102#21457#36865'(&T)'
      TabOrder = 8
      OnClick = Button2Click
    end
    object Button3: TButton
      Left = 264
      Top = 468
      Width = 89
      Height = 25
      Caption = #31435#21051#21457#36865'(&S)'
      TabOrder = 9
      OnClick = Button3Click
    end
    object EdtSex: TEdit
      Left = 208
      Top = 176
      Width = 49
      Height = 21
      BevelInner = bvNone
      BevelOuter = bvNone
      BorderStyle = bsNone
      TabOrder = 10
    end
    object EdtBirth: TEdit
      Left = 328
      Top = 176
      Width = 121
      Height = 21
      BevelInner = bvNone
      BevelOuter = bvNone
      BorderStyle = bsNone
      TabOrder = 11
    end
    object EdtCity: TEdit
      Left = 48
      Top = 200
      Width = 209
      Height = 21
      BevelInner = bvNone
      BevelOuter = bvNone
      BorderStyle = bsNone
      TabOrder = 12
    end
    object EdtZipcode: TEdit
      Left = 328
      Top = 200
      Width = 121
      Height = 21
      BevelInner = bvNone