frmmain.dfm

监听TCP、UDP端口,查看进程及服务.

object Main: TMain
  Left = 191
  Top = 130
  Width = 667
  Height = 439
  Caption = #33853#21494
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Icon.Data = {
    0000010001002020100000000000E80200001600000028000000200000004000
    0000010004000000000080020000000000000000000010000000000000000000
    0000000080000080000000808000800000008000800080800000C0C0C0008080
    80000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000FFFFF0000000000000000000000000000FFFF00000000000000000000000
    000000FF0F000000000000000000000000000000FFF00000FFFFF00000000000
    00000000FFFF0FFFFFFFFFF00000000000000000FFF0FFFFFFFFFFFF0F000000
    00000000FFF0FFFFFFFFFFFF000000000000000FFF0FFFFFFFFFFFFF00000000
    000000FFFF0FFFFFFFFFFFFF00000000000000FFFF0FFFFFFFFFFFFF00000000
    0000000FFFF0FFFFFFFFFFFF000000000000000FFFFFFFFFFFFFFFF000000000
    0000000FFFFFFFFFFFFFFFF00000000000000000FFFFFF0FFFFFFF0000000000
    00000000FFFFFF00FFFFF0000000000000000000FFFFFFF0FFF0000000000000
    00000000FFFFFFFFFF0000000000000000000000FFFFFFFFF000000000000000
    00000000FFFFFFFFF0000000000000000000000FFFFFFFFF0000000000000000
    000000FFFFFFFFFF00000000000000000000FFFFFFFFFFF00000000000000000
    00000FFFFFFFFF0000000000000000000000000FFFFFF0000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    000000000000000000000000000000000000000000000000000000000000FFFF
    FFFFFFFFFFFFFFFFFFFFFFFFFFFFFE03FFFFFF03FFFFFF81F063FFC00001FFE0
    0001F1E00001E0E00003C04000078000000780000007800000078000000F8000
    000FC000001FC000003FC000007FC00001FFE00003FFE00003FFF00007FFF800
    07FFFC000FFFFF001FFFFF803FFFFFE07FFFFFFFFFFFFFFFFFFFFFFFFFFF}
  Menu = MainMenu1
  OldCreateOrder = False
  OnClose = FormClose
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  PixelsPerInch = 96
  TextHeight = 13
  object ToolBar: TToolBar
    Left = 0
    Top = 0
    Width = 659
    Height = 40
    AutoSize = True
    ButtonHeight = 36
    ButtonWidth = 56
    EdgeBorders = [ebTop, ebBottom]
    Flat = True
    Images = ImageList
    Indent = 5
    ParentShowHint = False
    ShowCaptions = True
    ShowHint = True
    TabOrder = 0
    Wrapable = False
    object tbSave: TToolButton
      Left = 5
      Top = 0
      Hint = 'Save'
      Caption = #20445#23384
      ImageIndex = 1
      OnClick = tbSaveClick
    end
    object ToolButton1: TToolButton
      Left = 61
      Top = 0
      Width = 8
      Caption = 'ToolButton1'
      ImageIndex = 3
      Style = tbsSeparator
    end
    object tbRefresh: TToolButton
      Left = 69
      Top = 0
      Hint = 'Refresh'
      Caption = #21047#26032
      ImageIndex = 2
      OnClick = tbRefreshClick
    end
    object ToolButton2: TToolButton
      Left = 125
      Top = 0
      Width = 8
      Caption = 'ToolButton2'
      ImageIndex = 1
      Style = tbsSeparator
    end
    object tbtcpudp: TToolButton
      Left = 133
      Top = 0
      Hint = 'Show Net Stat'
      Caption = 'TCP/UDP'
      Down = True
      ImageIndex = 0
      Style = tbsCheck
      OnClick = tbtcpudpClick
    end
    object ToolButton3: TToolButton
      Left = 189
      Top = 0
      Width = 8
      Caption = 'ToolButton3'
      ImageIndex = 6
      Style = tbsSeparator
    end
    object tbprocess: TToolButton
      Left = 197
      Top = 0
      Hint = 'Show Process Name'
      Caption = #36827#31243
      ImageIndex = 4
      Style = tbsCheck
      OnClick = tbprocessClick
    end
    object ToolButton4: TToolButton
      Left = 253
      Top = 0
      Width = 8
      Caption = 'ToolButton4'
      ImageIndex = 6
      Style = tbsSeparator
    end
    object tbService: TToolButton
      Left = 261
      Top = 0
      Hint = 'Show Service Name'
      Caption = #26381#21153
      ImageIndex = 3
      Style = tbsCheck
      OnClick = tbServiceClick
    end
    object ToolButton5: TToolButton
      Left = 317
      Top = 0
      Width = 8
      Caption = 'ToolButton5'
      ImageIndex = 6
      Style = tbsSeparator
    end
    object tbTransparent: TToolButton
      Left = 325
      Top = 0
      Hint = 'Transparent Windows'
      Caption = #36879#26126
      ImageIndex = 7
      Style = tbsCheck
      OnClick = tbTransparentClick
    end
    object ToolButton8: TToolButton
      Left = 381
      Top = 0
      Width = 8
      Caption = 'ToolButton8'
      ImageIndex = 6
      Style = tbsSeparator
    end
    object tbAbout: TToolButton
      Left = 389
      Top = 0
      Hint = 'About'
      Caption = #20851#20110
      ImageIndex = 6
      OnClick = tmAboutClick
    end
    object ToolButton6: TToolButton
      Left = 445
      Top = 0
      Width = 8
      Caption = 'ToolButton6'
      ImageIndex = 6
      Style = tbsSeparator
    end
    object tbExit: TToolButton
      Left = 453
      Top = 0
      Hint = 'Exit'
      Caption = #36864#20986
      ImageIndex = 5
      OnClick = tbExitClick
    end
  end
  object nbBase: TNotebook
    Left = 0
    Top = 40
    Width = 659
    Height = 333
    Align = alClient
    TabOrder = 1
    object TPage
      Left = 0
      Top = 0
      Caption = 'TCP/UDP'
      object tvtcpudp: TListView
        Left = 0
        Top = 0
        Width = 659
        Height = 333
        Cursor = crHandPoint
        Align = alClient
        AllocBy = 100
        Columns = <
          item
            Caption = #21327#35758
            Width = 80
          end
          item
            Caption = #28304#22320#22336
            Width = 150
          end
          item
            Caption = #28304#31471#21475
            Width = 80
          end
          item
            Caption = #30446#30340#22320#22336
            Width = 150
          end
          item
            Caption = #30446#30340#31471#21475
            Width = 80
          end
          item
            Caption = #29366#24577
            Width = 100
          end>
        GridLines = True
        HotTrack = True
        ReadOnly = True
        RowSelect = True
        SmallImages = ImageList
        SortType = stBoth
        TabOrder = 0