unit1.~dfm

学校和学生家长用短信及时沟通学生在校情况或及时把有关通知、重要信息发布给学生家长。

object Form1: TForm1
  Left = 355
  Top = 261
  Width = 682
  Height = 448
  Caption = #25163#26426#30701#20449#36890'('#23398#26657#29256')'
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -16
  Font.Name = 'Fixedsys'
  Font.Style = []
  Icon.Data = {
    0000010001002020100000000000E80200001600000028000000200000004000
    0000010004000000000080020000000000000000000000000000000000000000
    000000008000008000000080800080000000800080008080000080808000C0C0
    C0000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000
    000000000000000000000000000000000000000C00000000000000000C000000
    0000008C00000000000000008C0000000002008C00000000000002008C000000
    00B2008C000000000000B2008C00000900B2008C000000000900B2008C0000D9
    00B2008C00000000D900B2008C0000D900B2008C00000000D900B2008C0000D9
    00B2008C00000000D900B2008C0000D900B2008C00000000D900B2008C0000D9
    00B2008C00000000D900B2008C0000D900B2008C00000000000000008C0000D9
    00B2008CCCCCCCCCCCCCCCCCCC0000D900B2008888888888888888888C0000D9
    00B2008C00000000D900B2008C0000D900B20000000000000000B2008C0000D9
    00B2222222222222222222008C0000D900BBBBBBBBBBBBBBBBBBB2008C0000D9
    00B2008C00000000D900B2008C0000D90000000000000000D900B2008C0000D9
    99999999999999999900B2008C0000DDDDDDDDDDDDDDDDDDD900B2008C0000D9
    00B2008C00000000D900B2008C0000D900B2008C00000000D900B2008C0000D9
    00B2008C00000000D900B2008C0000D900B2008000000000D900B200800000D9
    00B2000000000000D900B200000000D900B2000000000000D900B200000000D9
    00B0000000000000D900B000000000D90000000000000000D9000000000000D0
    0000000000000000D0000000000000000000000000000000000000000000FFFF
    FFFFFFEFFFFBFFCFFFF3FECFFFB3FCCFFF33ECCFFB33CCCFF333CCCFF333CCCF
    F333CCCFF333CCCFF333CCCFFFF3CCC00003CCC00003CCCFF333CCFFFF33CC00
    0033CC000033CCCFF333CFFFF333C0000333C0000333CCCFF333CCCFF333CCCF
    F333CCDFF337CCFFF33FCCFFF33FCDFFF37FCFFFF3FFDFFFF7FFFFFFFFFF}
  OldCreateOrder = False
  Position = poScreenCenter
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  PixelsPerInch = 96
  TextHeight = 16
  object StatusBar1: TStatusBar
    Left = 0
    Top = 392
    Width = 674
    Height = 22
    Panels = <>
    SimplePanel = False
  end
  object PageControl: TPageControl
    Left = 8
    Top = 8
    Width = 657
    Height = 377
    ActivePage = TabSheet1
    Images = ImageList1
    TabIndex = 0
    TabOrder = 1
    OnChange = PageControlChange
    object TabSheet1: TTabSheet
      Caption = #35774#32622#21644#32534#36753#30005#35805#21495#30721
      object GroupBox4: TGroupBox
        Left = 4
        Top = 4
        Width = 213
        Height = 157
        Caption = #35774#32622#21442#25968
        TabOrder = 0
        object Label5: TLabel
          Left = 8
          Top = 24
          Width = 80
          Height = 16
          Caption = #20449#24687#20013#24515#65306
        end
        object Label6: TLabel
          Left = 8
          Top = 52
          Width = 80
          Height = 16
          Caption = #31471'    '#21475#65306
        end
        object Label2: TLabel
          Left = 8
          Top = 80
          Width = 80
          Height = 16
          Caption = #35821'    '#35328#65306
        end
        object Label3: TLabel
          Left = 8
          Top = 108
          Width = 80
          Height = 16
          Caption = #26102'    '#38480#65306
        end
        object sbRegist: TSpeedButton
          Left = 80
          Top = 128
          Width = 121
          Height = 21
          Hint = #27880#20876#36719#20214
          Caption = #27880#20876#36719#20214
          Flat = True
          Font.Charset = GB2312_CHARSET
          Font.Color = clRed
          Font.Height = -16
          Font.Name = 'Fixedsys'
          Font.Style = []
          ParentFont = False
          ParentShowHint = False
          ShowHint = True
          OnClick = sbRegistClick
        end
        object Label8: TLabel
          Left = 8
          Top = 132
          Width = 80
          Height = 16
          Caption = #27880'    '#20876#65306
        end
        object edSmsc: TEdit
          Left = 80
          Top = 16
          Width = 125
          Height = 24
          TabOrder = 0
          Text = '[phone]'
        end
        object cbPort: TComboBox
          Left = 80
          Top = 44
          Width = 125
          Height = 24
          ItemHeight = 16
          TabOrder = 1
          Text = 'com1'
          Items.Strings = (
            'com1'
            'com2'
            'com3'
            'com4'
            'com5'
            'com6'
            'com7'
            'com8'
            'com9')
        end
        object cbLang: TComboBox
          Left = 80
          Top = 72
          Width = 125
          Height = 24
          ItemHeight = 16
          TabOrder = 2
          Text = #20013#25991
          Items.Strings = (
            #20013#25991
            #33521#25991
            'Flash')
        end
        object cbMval: TComboBox
          Left = 80
          Top = 100
          Width = 125
          Height = 24
          ItemHeight = 16
          TabOrder = 3
          Text = 'A7 24'#23567#26102
        end
      end
      object GroupBox5: TGroupBox
        Left = 4
        Top = 161
        Width = 213
        Height = 176
        Caption = #24180#32423#29677#32423#21517#31216
        TabOrder = 1
        object sgClassName: TStringGrid
          Left = 8
          Top = 16
          Width = 197
          Height = 153
          ColCount = 2
          DefaultColWidth = 35
          DefaultRowHeight = 20
          RowCount = 101
          Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goEditing]
          PopupMenu = PopupMenu1
          TabOrder = 0
          OnClick = sgClassNameClick
          ColWidths = (
            35
            134)
        end
      end
      object GroupBox6: TGroupBox
        Left = 224
        Top = 4
        Width = 417
        Height = 333
        Caption = #22995#21517#21644#30005#35805#21495#30721
        TabOrder = 2
        object sgEdPhoncode: TStringGrid
          Left = 8
          Top = 25
          Width = 401
          Height = 300
          ColCount = 4
          DefaultColWidth = 35
          DefaultRowHeight = 20
          RowCount = 101
          Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goColSizing]
          PopupMenu = PopupMenu2
          TabOrder = 0
          OnDblClick = sgEdPhoncodeDblClick
          ColWidths = (
            35
            97
            90
            154)
        end
      end
    end
    object TabSheet2: TTabSheet
      Caption = #32534#36753#24120#29992#30701#20449#29992#35821
      ImageIndex = 1
      object GroupBox7: TGroupBox
        Left = 4
        Top = 8
        Width = 641
        Height = 333
        Caption = #32534#36753#30701#20449#24120#29992#35821
        TabOrder = 0
        object sgEdSmTxt: TStringGrid
          Left = 8
          Top = 20
          Width = 625
          Height = 301
          ColCount = 2
          DefaultColWidth = 35
          DefaultRowHeight = 20
          RowCount = 101
          Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goEditing]
          PopupMenu = PopupMenu3
          TabOrder = 0
          ColWidths = (
            35
            534)
        end