tools.dfm

最好的局域网搜索软件

object ToolsForm: TToolsForm
  Left = 307
  Top = 244
  Width = 623
  Height = 320
  Caption = '网络工具'
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = '宋体'
  Font.Style = []
  FormStyle = fsStayOnTop
  OldCreateOrder = False
  Position = poScreenCenter
  OnCloseQuery = FormCloseQuery
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  PixelsPerInch = 96
  TextHeight = 12
  object PageCtrl: TPageControl
    Left = 0
    Top = 0
    Width = 615
    Height = 293
    ActivePage = SendMsgTabSheet
    Align = alClient
    TabOrder = 0
    OnChange = PageCtrlChange
    object FindIpTabSheet: TTabSheet
      Caption = 'IP地址查询'
      object TopPanel: TPanel
        Left = 0
        Top = 0
        Width = 607
        Height = 25
        Align = alTop
        BevelInner = bvRaised
        BevelOuter = bvLowered
        TabOrder = 0
        object BtnCheckIP: TSpeedButton
          Left = 491
          Top = 3
          Width = 57
          Height = 19
          Anchors = [akTop, akRight]
          Caption = '查找'
          OnClick = BtnCheckIPClick
        end
        object Label1: TLabel
          Left = 8
          Top = 8
          Width = 84
          Height = 12
          Caption = '主机名(域名)：'
        end
        object Edit1: TEdit
          Left = 88
          Top = 2
          Width = 394
          Height = 20
          Anchors = [akLeft, akTop, akRight]
          TabOrder = 0
          OnKeyDown = Edit1KeyDown
        end
      end
      object IPListView: TListView
        Left = 0
        Top = 25
        Width = 607
        Height = 222
        Align = alClient
        Columns = <
          item
            Caption = '主机名/域名'
            Width = 150
          end
          item
            Caption = 'IP地址'
            Width = 150
          end>
        ColumnClick = False
        GridLines = True
        RowSelect = True
        PopupMenu = PopupMenu1
        TabOrder = 1
        ViewStyle = vsReport
      end
      object Panel2: TPanel
        Left = 0
        Top = 247
        Width = 607
        Height = 19
        Align = alBottom
        BevelInner = bvRaised
        BevelOuter = bvLowered
        TabOrder = 2
        object Radio1: TRadioButton
          Left = 8
          Top = 3
          Width = 121
          Height = 14
          Caption = '主机名(域名)查IP'
          Checked = True
          TabOrder = 0
          TabStop = True
          OnClick = Radio1Click
        end
        object Radio2: TRadioButton
          Left = 135
          Top = 3
          Width = 122
          Height = 14
          Caption = 'IP查主机名(域名)'
          TabOrder = 1
          OnClick = Radio2Click
        end
      end
    end
    object NbtTabSheet: TTabSheet
      Caption = 'Nbtstat'
      ImageIndex = 1
      object Panel1: TPanel
        Left = 0
        Top = 0
        Width = 607
        Height = 26
        Align = alTop
        BevelInner = bvRaised
        BevelOuter = bvLowered
        TabOrder = 0
        object Label2: TLabel
          Left = 3
          Top = 7
          Width = 60
          Height = 12
          Caption = '起始地址：'
        end
        object Label3: TLabel
          Left = 170
          Top = 7
          Width = 60
          Height = 12
          Caption = '终止地址：'
        end
        object Label4: TLabel
          Left = 409
          Top = 7
          Width = 60
          Height = 12
          Caption = '设置超时：'
        end
        object Label5: TLabel
          Left = 526
          Top = 6
          Width = 26
          Height = 13
          AutoSize = False
          Caption = '毫秒'
        end
        object btnNbtStart: TSpeedButton
          Left = 715
          Top = 3
          Width = 65
          Height = 22
          Anchors = [akTop, akRight]
          Caption = '开始'
        end
        object btnNbt: TSpeedButton
          Left = 560
          Top = 3
          Width = 41
          Height = 20
          Anchors = [akTop, akRight]
          Caption = '开始'
          OnClick = btnNbtClick
        end
        object btnNbtAddrUp: TSpeedButton
          Left = 383
          Top = 4
          Width = 23
          Height = 10
          Hint = '上一网段'
          Glyph.Data = {
            BE000000424DBE00000000000000760000002800000009000000090000000100
            0400000000004800000000000000000000001000000000000000000000000000
            8000008000000080800080000000800080008080000080808000C0C0C0000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFF000
            0000FFFFFFFFF00000000000000000000000F0000000F0000000FF00000FF000
            0000FFF000FFF0000000FFFF0FFFF0000000FFFFFFFFF0000000FFFFFFFFF000
            0000}
          Layout = blGlyphBottom
          ParentShowHint = False
          ShowHint = True
          OnClick = btnNbtAddrUpClick
        end
        object btnNbtAddrDown: TSpeedButton
          Left = 383
          Top = 14
          Width = 23
          Height = 9
          Hint = '下一网段'
          Glyph.Data = {
            BE000000424DBE00000000000000760000002800000009000000090000000100
            0400000000004800000000000000000000001000000000000000000000000000
            8000008000000080800080000000800080008080000080808000C0C0C0000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFF000
            0000FFFFFFFFF0000000FFFF0FFFF0000000FFF000FFF0000000FF00000FF000
            0000F0000000F00000000000000000000000FFFFFFFFF0000000FFFFFFFFF000
            0000}
          Layout = blGlyphBottom
          ParentShowHint = False
          ShowHint = True
          OnClick = btnNbtAddrDownClick
        end
        object btnNbtLocalLan: TSpeedButton
          Left = 336
          Top = 4
          Width = 41
          Height = 19
          Caption = '本网段'
          OnClick = btnNbtLocalLanClick
        end
        object edtNbtIP1: TEdit
          Left = 61
          Top = 3
          Width = 101
          Height = 20
          TabOrder = 0
          Text = '192.168.0.1'
        end
        object edtNbtIP2: TEdit
          Left = 230
          Top = 3
          Width = 101
          Height = 20
          TabOrder = 1
          Text = '192.168.0.255'
        end
        object spInterval: TSpinEdit
          Left = 469
          Top = 2
          Width = 50
          Height = 21
          MaxValue = 0
          MinValue = 0
          TabOrder = 2
          Value = 100
        end
      end
      object lvNbt: TListView
        Left = 0
        Top = 26
        Width = 607
        Height = 221
        Align = alClient
        Columns = <
          item
            Caption = 'IP地址'
            Width = 120
          end
          item
            Caption = '工作组'
            Width = 110
          end
          item
            Caption = '主机'
            Width = 100
          end
          item
            Caption = '用户/其它'
            Width = 100
          end
          item
            Caption = 'MAC地址'
            Width = 120
          end>
        ColumnClick = False
        GridLines = True
        RowSelect = True
        ParentShowHint = False
        PopupMenu = PopupMenu1
        ShowHint = False
        TabOrder = 1
        ViewStyle = vsReport
        OnDblClick = lvNbtDblClick
      end
      object pnlStatus: TPanel
        Left = 0
        Top = 247
        Width = 607
        Height = 19
        Align = alBottom
        Alignment = taLeftJustify
        BevelInner = bvRaised
        BevelOuter = bvLowered
        TabOrder = 2
        object cbIP: TCheckBox
          Left = 468
          Top = 3
          Width = 129
          Height = 14
          Anchors = [akTop, akRight]
          Caption = '双击时按IP地址搜索'
          TabOrder = 0
        end
        object cbAddToTree: TCheckBox
          Left = 331
          Top = 3
          Width = 129
          Height = 14
          Anchors = [akTop, akRight]
          Caption = '自动加入搜索目录树'
          TabOrder = 1
        end
      end
    end
    object TCPScanTabSheet: TTabSheet
      Caption = 'TCP端口扫描'
      ImageIndex = 2
      object Panel3: TPanel
        Left = 0
        Top = 0
        Width = 607
        Height = 26
        Align = alTop
        BevelInner = bvRaised
        BevelOuter = bvLowered
        TabOrder = 0
        object Label6: TLabel
          Left = 4
          Top = 7
          Width = 60
          Height = 12
          Caption = '起始地址：'
        end
        object Label7: TLabel
          Left = 175
          Top = 7
          Width = 60
          Height = 12
          Caption = '终止地址：'
        end
        object Label8: TLabel
          Left = 411
          Top = 7
          Width = 60
          Height = 12
          Caption = '设置超时：'
        end
        object Label9: TLabel
          Left = 526
          Top = 6
          Width = 26
          Height = 13
          AutoSize = False
          Caption = '毫秒'
        end
        object SpeedButton1: TSpeedButton
          Left = 715
          Top = 3
          Width = 65
          Height = 22
          Anchors = [akTop, akRight]
          Caption = '开始'
        end
        object btnScanPort: TSpeedButton
          Left = 555
          Top = 4
          Width = 48
          Height = 20
          Anchors = [akTop, akRight]
          Caption = '开始'
          OnClick = btnScanPortClick
        end
        object btnScanAddrDown: TSpeedButton
          Left = 384
          Top = 14
          Width = 23
          Height = 9
          Hint = '下一网段'
          Glyph.Data = {
            BE000000424DBE00000000000000760000002800000009000000090000000100
            0400000000004800000000000000000000001000000000000000000000000000
            8000008000000080800080000000800080008080000080808000C0C0C0000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFF000
            0000FFFFFFFFF0000000FFFF0FFFF0000000FFF000FFF0000000FF00000FF000
            0000F0000000F00000000000000000000000FFFFFFFFF0000000FFFFFFFFF000
            0000}
          Layout = blGlyphBottom
          ParentShowHint = False
          ShowHint = True
          OnClick = btnScanAddrDownClick
        end
        object btnScanAddrUp: TSpeedButton
          Left = 384
          Top = 4
          Width = 23
          Height = 10
          Hint = '上一网段'
          Glyph.Data = {
            BE000000424DBE00000000000000760000002800000009000000090000000100
            0400000000004800000000000000000000001000000000000000000000000000
            8000008000000080800080000000800080008080000080808000C0C0C0000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFF000
            0000FFFFFFFFF00000000000000000000000F0000000F0000000FF00000FF000
            0000FFF000FFF0000000FFFF0FFFF0000000FFFFFFFFF0000000FFFFFFFFF000
            0000}
          Layout = blGlyphBottom
          ParentShowHint = False
          ShowHint = True
          OnClick = btnScanAddrUpClick
        end
        object btnScanLocalLan: TSpeedButton
          Left = 337
          Top = 4
          Width = 41
          Height = 19
          Caption = '本网段'
          OnClick = btnScanLocalLanClick
        end
        object edtScanIP1: TEdit
          Left = 65
          Top = 3
          Width = 101
          Height = 20
          TabOrder = 0
          Text = '192.168.0.1'
        end
        object edtScanIP2: TEdit
          Left = 232
          Top = 3
          Width = 101
          Height = 20
          TabOrder = 1
          Text = '192.168.0.255'
        end
        object spTimeOut: TSpinEdit
          Left = 471
          Top = 3
          Width = 50
          Height = 21
          MaxValue = 0
          MinValue = 0
          TabOrder = 2
          Value = 100
        end
      end