unit1.dfm

计算机网络与通信的知识

object Form1: TForm1
  Left = 276
  Top = 110
  Width = 410
  Height = 287
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = '宋体'
  Font.Style = []
  Menu = MainMenu1
  OldCreateOrder = False
  OnActivate = FormActivate
  OnClose = FormClose
  OnCloseQuery = FormCloseQuery
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 12
  object Image1: TImage
    Left = 200
    Top = 96
    Width = 73
    Height = 49
    Picture.Data = {
      055449636F6E0000010002001010100000000000280100002600000020201000
      00000000E80200004E0100002800000010000000200000000100040000000000
      C000000000000000000000000000000000000000000000000000800000800000
      00808000800000008000800080800000C0C0C000808080000000FF0000FF0000
      00FFFF00FF000000FF00FF00FFFF0000FFFFFF00000444444444444000047777
      7777774000047777779077400000777777017740000307777777774000B33077
      770077400BBB33077091074000BBB33070910740000BBB33009107400000BBB0
      7091074000040B07709107400004707770910740000477777099074000047777
      7099074000047777770077400004444444444440E0010000E0010000E0010000
      E0010000C0010000800100000001000080010000C0010000E0010000E0010000
      E0010000E0010000E0010000E0010000E0010000280000002000000040000000
      0100040000000000800200000000000000000000000000000000000000000000
      000080000080000000808000800000008000800080800000C0C0C00080808000
      0000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0000000004
      4444444444444444444444400000000444444444444444444444444000000004
      4777777777777777777774400000000447777777777777700077744000000004
      4777777777777709910774400000000447777777777777099107744000000000
      4777777777777709910774400000000007777777777777700077744000000033
      007777777777777777777440000003333007777777777777077774400000BB33
      330077777777777090777440000BBBB3333007777777770991077440000BBBBB
      3333007777777709910774400000BBBBB3333007777777099107744000000BBB
      BB3333007777709991107440000000BBBBB3333007777099911074400000000B
      BBBB3333007770999110744000000000BBBBB330077770999110744000000000
      0BBBBB0077777099911074400000000400BBB007777770999110744000000004
      400B007777777099911074400000000447000777777770999110744000000004
      4770777777777099911074400000000447777777777770999110744000000004
      4777777777777099991074400000000447777777777777099907744000000004
      4777777777777709990774400000000447777777777777099907744000000004
      4777777777777770907774400000000447777777777777770777744000000004
      44444444444444444444444000000004444444444444444444444440FE000001
      FE000001FE000001FE000001FE000001FE000001FE000001FC000001F8000001
      F0000001C0000001C0000001C0000001C0000001E0000001F0000001F8000001
      FC000001FE000001FE000001FE000001FE000001FE000001FE000001FE000001
      FE000001FE000001FE000001FE000001FE000001FE000001FE000001}
    Visible = False
  end
  object historylistbox: TListBox
    Left = 0
    Top = 0
    Width = 402
    Height = 241
    Align = alClient
    ItemHeight = 12
    PopupMenu = PopupMenu1
    TabOrder = 0
  end
  object ServerSocket1: TServerSocket
    Active = False
    Port = 7809
    ServerType = stThreadBlocking
    ThreadCacheSize = 20
    OnGetThread = ServerSocket1GetThread
    OnThreadEnd = ServerSocket1ThreadEnd
    Left = 72
    Top = 48
  end
  object MainMenu1: TMainMenu
    OnChange = MainMenu1Change
    Left = 200
    Top = 48
    object N1: TMenuItem
      Caption = '服务'
      object N5: TMenuItem
        Caption = '设置…'
        OnClick = N5Click
      end
      object N2: TMenuItem
        Caption = '打开服务'
        OnClick = N2Click
      end
      object N4: TMenuItem
        Caption = '-'
      end
      object N3: TMenuItem
        Caption = '退出系统'
        OnClick = N3Click
      end
    end
    object N6: TMenuItem
      Caption = '日志维护'
      object N7: TMenuItem
        Caption = '清除列表'
        OnClick = N7Click
      end
      object N14: TMenuItem
        Caption = '查看当天'
        OnClick = N14Click
      end
    end
    object N8: TMenuItem
      Caption = '帮助'
      object N9: TMenuItem
        Caption = '关于软件'
        OnClick = N9Click
      end
      object N10: TMenuItem
        Caption = '怎样操作'
        OnClick = N10Click
      end
    end
  end
  object PopupMenu1: TPopupMenu
    Left = 104
    Top = 48
    object N12: TMenuItem
      Caption = '清除记录'
      OnClick = N12Click
    end
  end
  object Timer1: TTimer
    Enabled = False
    OnTimer = Timer1Timer
    Left = 136
    Top = 48
  end
  object PopupMenu2: TPopupMenu
    Left = 168
    Top = 48
    object N11: TMenuItem
      Caption = '正常显示'
      OnClick = N11Click
    end
    object N13: TMenuItem
      Caption = '退出服务'
      OnClick = N13Click
    end
  end
end