main.dfm

一个SNOOP控件,各位看看可以对网络包进行分析.

object MainForm: TMainForm
  Left = 284
  Top = 101
  BorderStyle = bsDialog
  Caption = 'MyNetwork'
  ClientHeight = 250
  ClientWidth = 314
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  Scaled = False
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object btnGetInfo: TButton
    Left = 232
    Top = 8
    Width = 75
    Height = 25
    Caption = 'Info'
    TabOrder = 0
    OnClick = btnGetInfoClick
  end
  object Memo1: TMemo
    Left = 8
    Top = 40
    Width = 297
    Height = 201
    ImeName = '茄惫绢(茄臂) (MS-IME98)'
    ScrollBars = ssVertical
    TabOrder = 1
  end
  object cbxAdapter: TComboBox
    Left = 8
    Top = 8
    Width = 217
    Height = 21
    Style = csDropDownList
    ImeName = '茄惫绢(茄臂) (MS-IME98)'
    ItemHeight = 13
    TabOrder = 2
  end
  object SnoopMyNetwork1: TSnoopMyNetwork
    AdapterIndex = -1
    AdapterDescription = 
      'NDIS 5.0 driver                                                 ' +
      '                 '
    StrIP = '0.0.0.0'
    StrMac = '000000-000000'
    StrSubnetMask = '0.0.0.0'
    StrGateway = '0.0.0.0'
    Left = 16
    Top = 48
  end
end