其他

开发平台：

Delphi

NetInfoDlg.dfm：源码内容

							object NetBiosInfoDlg: TNetBiosInfoDlg
  Left = 208
  Top = 107
  BorderStyle = bsDialog
  Caption = '刺探主机NetBIOS信息'
  ClientHeight = 302
  ClientWidth = 363
  Color = clBtnFace
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = '宋体'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 12
  object Label1: TLabel
    Left = 12
    Top = 12
    Width = 36
    Height = 12
    Caption = '目标IP'
  end
  object edHostAddr: TEdit
    Left = 52
    Top = 8
    Width = 121
    Height = 20
    TabOrder = 0
  end
  object GroupBox1: TGroupBox
    Left = 12
    Top = 36
    Width = 341
    Height = 257
    Caption = 'NetBIOS信息'
    TabOrder = 2
    object InfoList: TListBox
      Left = 2
      Top = 14
      Width = 337
      Height = 241
      Align = alClient
      ItemHeight = 12
      TabOrder = 0
    end
  end
  object btnExecute: TButton
    Left = 196
    Top = 8
    Width = 75
    Height = 25
    Caption = '刺探！'
    Default = True
    TabOrder = 1
    OnClick = btnExecuteClick
  end
  object btnClose: TButton
    Left = 276
    Top = 8
    Width = 75
    Height = 25
    Cancel = True
    Caption = '关闭'
    ModalResult = 1
    TabOrder = 3
  end
  object InfoMenu: TPopupMenu
    Left = 144
    Top = 88
    object mClear: TMenuItem
      Caption = '清除'
      OnClick = mClearClick
    end
    object mSave: TMenuItem
      Caption = '保存'
      OnClick = mSaveClick
    end
  end
  object SaveDlg: TSaveDialog
    DefaultExt = 'txt'
    Filter = '文本文件(*.TXT)|.TXT'
    Left = 100
    Top = 136
  end
end

						