frmtcpudpinfo.dfm

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

object TCPUDPinfo: TTCPUDPinfo
  Left = 222
  Top = 224
  BorderStyle = bsDialog
  Caption = 'TCP/UDP信息'
  ClientHeight = 230
  ClientWidth = 436
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsStayOnTop
  OldCreateOrder = False
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Label2: TLabel
    Left = 32
    Top = 80
    Width = 30
    Height = 13
    Caption = '协议: '
  end
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 436
    Height = 230
    Align = alClient
    BevelOuter = bvLowered
    TabOrder = 0
    object Label1: TLabel
      Left = 16
      Top = 48
      Width = 30
      Height = 13
      AutoSize = False
      Caption = '协议: '
    end
    object Label3: TLabel
      Left = 16
      Top = 88
      Width = 49
      Height = 13
      AutoSize = False
      Caption = '源地址:'
    end
    object Label4: TLabel
      Left = 16
      Top = 128
      Width = 49
      Height = 13
      AutoSize = False
      Caption = '源端口:'
    end
    object Label6: TLabel
      Left = 212
      Top = 88
      Width = 77
      Height = 13
      AutoSize = False
      Caption = '目的地址:'
    end
    object Label7: TLabel
      Left = 212
      Top = 128
      Width = 85
      Height = 13
      AutoSize = False
      Caption = '目的端口:'
    end
    object Label5: TLabel
      Left = 212
      Top = 48
      Width = 69
      Height = 14
      AutoSize = False
      Caption = '状态:'
    end
    object edProtocol: TEdit
      Left = 72
      Top = 40
      Width = 121
      Height = 21
      Color = clWhite
      ReadOnly = True
      TabOrder = 0
    end
    object btnExit: TButton
      Left = 336
      Top = 184
      Width = 75
      Height = 25
      Caption = 'Close'
      TabOrder = 1
      TabStop = False
      OnClick = btnExitClick
    end
  end
  object edsa: TEdit
    Tag = 2
    Left = 72
    Top = 80
    Width = 121
    Height = 21
    Color = clWhite
    ReadOnly = True
    TabOrder = 2
  end
  object edsp: TEdit
    Tag = 4
    Left = 72
    Top = 120
    Width = 121
    Height = 21
    Color = clWhite
    ReadOnly = True
    TabOrder = 4
  end
  object edda: TEdit
    Tag = 3
    Left = 300
    Top = 80
    Width = 122
    Height = 21
    Color = clWhite
    ReadOnly = True
    TabOrder = 3
  end
  object eddp: TEdit
    Tag = 5
    Left = 300
    Top = 120
    Width = 121
    Height = 21
    Color = clWhite
    ReadOnly = True
    TabOrder = 5
  end
  object edStat: TEdit
    Tag = 1
    Left = 301
    Top = 40
    Width = 121
    Height = 21
    Color = clWhite
    ReadOnly = True
    TabOrder = 1
  end
end