unit1.dfm

能模拟SGIP的网关模拟

object Form1: TForm1
  Left = 205
  Top = 104
  Width = 519
  Height = 395
  Caption = 'GateWay'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -10
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Menu = MainMenu1
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
  object StatusBar1: TStatusBar
    Left = 0
    Top = 330
    Width = 511
    Height = 19
    Panels = <
      item
        Width = 170
      end
      item
        Width = 170
      end
      item
        Width = 170
      end>
    SimplePanel = False
  end
  object Panel1: TPanel
    Left = 214
    Top = 193
    Width = 297
    Height = 137
    Align = alRight
    TabOrder = 1
    object Label1: TLabel
      Left = 17
      Top = 72
      Width = 96
      Height = 13
      AutoSize = False
      Caption = #24310#36831#22238#22797#26102#38388
    end
    object Label2: TLabel
      Left = 120
      Top = 96
      Width = 33
      Height = 13
      AutoSize = False
      Caption = #27627#31186
    end
    object Label3: TLabel
      Left = 16
      Top = 32
      Width = 73
      Height = 13
      AutoSize = False
      Caption = #36830#25509#31471#21475
    end
    object Label4: TLabel
      Left = 112
      Top = 32
      Width = 65
      Height = 13
      AutoSize = False
      Caption = #30417#21548#31471#21475
    end
    object Button1: TButton
      Left = 181
      Top = 7
      Width = 66
      Height = 20
      Caption = #27169#25311'Deliver'
      TabOrder = 0
      OnClick = Button1Click
    end
    object ComboBox1: TComboBox
      Left = 16
      Top = 96
      Width = 97
      Height = 21
      ItemHeight = 13
      TabOrder = 1
      Text = '30'
      Items.Strings = (
        '10'
        '20'
        '30'
        '40'
        '50'
        '60'
        '70')
    end
    object Button2: TButton
      Left = 14
      Top = 8
      Width = 74
      Height = 22
      Caption = #24320#21551#32593#20851
      TabOrder = 2
      OnClick = Button2Click
    end
    object Edit1: TEdit
      Left = 16
      Top = 48
      Width = 81
      Height = 21
      TabOrder = 3
      Text = '8881'
    end
    object Edit2: TEdit
      Left = 112
      Top = 48
      Width = 73
      Height = 21
      TabOrder = 4
      Text = '8901'
    end
    object Button3: TButton
      Left = 98
      Top = 8
      Width = 61
      Height = 20
      Caption = #27169#25311'bind'
      TabOrder = 5
      OnClick = Button3Click
    end
    object Button5: TButton
      Left = 200
      Top = 48
      Width = 63
      Height = 22
      Caption = #27169#25311#26029#32447
      TabOrder = 6
      OnClick = Button5Click
    end
  end
  object Panel2: TPanel
    Left = 0
    Top = 193
    Width = 214
    Height = 137
    Align = alClient
    Caption = 'Panel2'
    TabOrder = 2
    object Memo1: TMemo
      Left = 1
      Top = 1
      Width = 212
      Height = 135
      Align = alClient
      TabOrder = 0
    end
  end
  object Panel3: TPanel
    Left = 0
    Top = 0
    Width = 511
    Height = 193
    Align = alTop
    TabOrder = 3
    object ListView1: TListView
      Left = 1
      Top = 1
      Width = 509
      Height = 191
      Align = alClient
      Columns = <
        item
        end
        item
          Caption = 'ID'
          Width = 70
        end
        item
          Caption = 'COMMAND_TYPE'
          Width = 110
        end
        item
          Caption = 'MSGCONTENT'
          Width = 270
        end>
      SmallImages = ImageList1
      StateImages = ImageList1
      TabOrder = 0
      ViewStyle = vsReport
    end
  end
  object ServerSocket1: TServerSocket
    Active = False
    Port = 9881
    ServerType = stNonBlocking
    OnClientConnect = ServerSocket1ClientConnect
    OnClientRead = ServerSocket1ClientRead
    Left = 264
    Top = 65528
  end
  object MainMenu1: TMainMenu
    Left = 232
    Top = 65528
    object Connect1: TMenuItem
      Caption = 'Menu'
      object Connect2: TMenuItem
        AutoCheck = True
        Caption = 'Connect'
        OnClick = Connect1Click
      end
      object Exit1: TMenuItem
        Caption = 'Exit'
        OnClick = Exit1Click
      end
    end
  end
  object ClientSocket1: TClientSocket
    Active = False
    ClientType = ctNonBlocking
    Port = 9881
    OnConnect = ClientSocket1Connect
    OnRead = ClientSocket1Read
    OnError = ClientSocket1Error
    Left = 200
    Top = 65528
  end
  object ImageList1: TImageList
    Left = 296
    Top = 65528
    Bitmap = {
      494C010119001D00040010001000FFFFFFFFFF10FFFFFFFFFFFFFFFF424D3600
      0000000000003600000028000000400000008000000001001000000000000040
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000