main.dfm

GPRS/CDMA DTU数据中心源代码,基于DataCenterX控件开发.

object frmMain: TfrmMain
  Left = 29
  Top = 125
  Width = 1032
  Height = 763
  Caption = #20247#23665#31185#25216' GPRS/CDMA DTU'#37319#38598#20013#24515#27979#35797#36719#20214'V2.76'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Menu = MainMenu1
  OldCreateOrder = False
  Position = poDesktopCenter
  OnActivate = FormActivate
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Splitter1: TSplitter
    Left = 0
    Top = 375
    Width = 1024
    Height = 3
    Cursor = crVSplit
    Align = alTop
  end
  object ListView1: TListView
    Left = 0
    Top = 69
    Width = 1024
    Height = 306
    Align = alTop
    BorderStyle = bsNone
    Color = 16250352
    Columns = <
      item
        Caption = 'DTUID'
        Width = 90
      end
      item
        Caption = #30005#35805#21495#30721
        Width = 80
      end
      item
        Caption = #36890#20449#21327#35758
        Width = 60
      end
      item
        Caption = #31227#21160#20869#32593'IP'
        Width = 80
      end
      item
        Caption = #31227#21160#20869#32593#31471#21475
        Width = 100
      end
      item
        Caption = #22806#32593'IP'#22320#22336
        Width = 80
      end
      item
        Caption = #22806#32593#31471#21475
        Width = 80
      end
      item
        Caption = #26368#26032#30331#38470#26102#38388
        Width = 115
      end
      item
        Caption = #26368#26032#19978#34892#36890#20449#26102#38388
        Width = 115
      end
      item
        Caption = #21457#36865#23383#33410#25968
        Width = 95
      end
      item
        Caption = #25509#25910#23383#33410#25968
        Width = 95
      end>
    GridLines = True
    HotTrackStyles = [htHandPoint, htUnderlineCold, htUnderlineHot]
    MultiSelect = True
    ReadOnly = True
    RowSelect = True
    PopupMenu = PopupMenu1
    SmallImages = ImageList2
    StateImages = ImageList1
    TabOrder = 3
    ViewStyle = vsReport
  end
  object Memo1: TMemo
    Left = 0
    Top = 378
    Width = 1024
    Height = 331
    Align = alClient
    ImeName = #20013#25991' ('#31616#20307') - '#20840#25340
    TabOrder = 0
  end
  object DataCenterX1: TDataCenterX
    Left = 456
    Top = 138
    Width = 75
    Height = 25
    TabOrder = 1
    Visible = False
    OnDTUData = DataCenterX1DTUData
    OnDTULogin = DataCenterX1DTULogin
    OnDTULogout = DataCenterX1DTULogout
    OnSysError = DataCenterX1SysError
    OnDTUDisconnect = DataCenterX1DTUDisconnect
    OnDTUBeat = DataCenterX1DTUBeat
    OnDTUDataX = DataCenterX1DTUDataX
    OnDTUAlarm = DataCenterX1DTUAlarm
    OnDTUData2 = DataCenterX1DTUData2
    OnPingResult = DataCenterX1PingResult
    ControlData = {
      545046300754427574746F6E00044C65667403C80103546F70038A0005576964
      7468024B0648656967687402190000}
  end
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 1024
    Height = 69
    Align = alTop
    Color = clSkyBlue
    TabOrder = 2
    object GroupBox1: TGroupBox
      Left = 1
      Top = 1
      Width = 305
      Height = 67
      Align = alLeft
      TabOrder = 0
      object btStartService: TsuiButton
        Left = 8
        Top = 23
        Width = 65
        Height = 25
        UIStyle = WinXP
        Caption = #21551#21160#26381#21153
        AutoSize = False
        TabOrder = 0
        Transparent = True
        ModalResult = 0
        Layout = blGlyphLeft
        Spacing = 4
        ResHandle = 0
        OnClick = btStartServiceClick
      end
      object btStopService: TsuiButton
        Left = 76
        Top = 23
        Width = 65
        Height = 25
        UIStyle = WinXP
        Caption = #20572#27490#26381#21153
        AutoSize = False
        Enabled = False
        TabOrder = 1
        Transparent = True
        ModalResult = 0
        Layout = blGlyphLeft
        Spacing = 4
        ResHandle = 0
        OnClick = btStopServiceClick
      end
      object btStartTest: TsuiButton
        Left = 160
        Top = 23
        Width = 65
        Height = 25
        UIStyle = WinXP
        Caption = #21551#21160#27979#35797
        AutoSize = False
        Visible = False
        TabOrder = 2
        Transparent = True
        ModalResult = 0
        Layout = blGlyphLeft
        Spacing = 4
        ResHandle = 0
      end
      object btStopTest: TsuiButton
        Left = 228
        Top = 23
        Width = 65
        Height = 25
        UIStyle = WinXP
        Caption = #20572#27490#27979#35797
        AutoSize = False
        Visible = False
        Enabled = False
        TabOrder = 3
        Transparent = True
        ModalResult = 0
        Layout = blGlyphLeft
        Spacing = 4
        ResHandle = 0
      end
    end
    object GroupBox2: TGroupBox
      Left = 306
      Top = 1
      Width = 527
      Height = 67
      Align = alLeft
      TabOrder = 1
      object Memo2: TMemo
        Left = 65
        Top = 15
        Width = 167
        Height = 50
        Align = alClient
        ImeName = #20013#25991' ('#31616#20307') - '#20840#25340
        TabOrder = 0
        OnChange = Memo2Change
        OnKeyPress = Memo2KeyPress
      end
      object Memo6: TMemo
        Left = 232
        Top = 15
        Width = 192
        Height = 50
        Align = alRight
        ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
        ReadOnly = True
        TabOrder = 1
        Visible = False
      end
      object Panel2: TPanel
        Left = 424
        Top = 15
        Width = 101
        Height = 50
        Align = alRight
        Color = clSkyBlue
        TabOrder = 2
        object ComboBox2: TComboBox
          Left = 7
          Top = 1
          Width = 82
          Height = 21
          ImeName = #20013#25991' ('#31616#20307') - '#20840#25340
          ItemHeight = 13
          TabOrder = 0
          Text = '1'
          Items.Strings = (
            '1'
            '10'
            '100'
            '1000'
            '10000')
        end