⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 tools.dfm

📁 vpn网上邻居搜索器 工作组 未打开的工作组 正在搜索的工作组 已打开的工作组 无法打开的工作组 主机 未打开的主机 正在搜索的主机 打开的主机(无须登录) 打开的主机(以gues
💻 DFM
📖 第 1 页 / 共 2 页
字号:
        object Label11: TLabel
          Left = 7
          Top = 4
          Width = 84
          Height = 12
          Caption = '正在扫描的地址'
        end
        object cbAddToTree2: TCheckBox
          Left = 416
          Top = 3
          Width = 129
          Height = 14
          Anchors = [akTop, akRight]
          Caption = '自动加入搜索目录树'
          TabOrder = 0
        end
      end
    end
    object PingTabSheet: TTabSheet
      Caption = 'Ping'
      ImageIndex = 3
      object Panel5: TPanel
        Left = 0
        Top = 0
        Width = 556
        Height = 26
        Align = alTop
        BevelInner = bvLowered
        BevelOuter = bvNone
        TabOrder = 0
        object Label12: TLabel
          Left = 3
          Top = 7
          Width = 60
          Height = 12
          Caption = '起始地址:'
        end
        object Label13: TLabel
          Left = 170
          Top = 7
          Width = 60
          Height = 12
          Caption = '终止地址:'
        end
        object Label14: TLabel
          Left = 339
          Top = 7
          Width = 60
          Height = 12
          Caption = '设置超时:'
        end
        object Label15: TLabel
          Left = 456
          Top = 6
          Width = 26
          Height = 13
          AutoSize = False
          Caption = '毫秒'
        end
        object SpeedButton2: TSpeedButton
          Left = 664
          Top = 3
          Width = 65
          Height = 22
          Anchors = [akTop, akRight]
          Caption = '开始'
        end
        object btnPing: TSpeedButton
          Left = 488
          Top = 3
          Width = 65
          Height = 22
          Anchors = [akTop, akRight]
          Caption = '开始'
          OnClick = btnPingClick
        end
        object edtPing1: TEdit
          Left = 61
          Top = 3
          Width = 101
          Height = 20
          TabOrder = 0
          Text = '192.168.0.1'
        end
        object edtPing2: TEdit
          Left = 230
          Top = 3
          Width = 101
          Height = 20
          TabOrder = 1
          Text = '192.168.0.255'
        end
        object spPingTime: TSpinEdit
          Left = 399
          Top = 3
          Width = 50
          Height = 21
          MaxValue = 0
          MinValue = 0
          TabOrder = 2
          Value = 50
        end
      end
      object lvPing: TListView
        Left = 0
        Top = 26
        Width = 556
        Height = 218
        Align = alClient
        Columns = <
          item
            Caption = '能ping通的IP地址'
            Width = 120
          end>
        ColumnClick = False
        GridLines = True
        RowSelect = True
        ParentShowHint = False
        PopupMenu = PopupMenu1
        ShowHint = False
        TabOrder = 1
        ViewStyle = vsReport
        OnDblClick = lvPingDblClick
      end
      object Panel6: TPanel
        Left = 0
        Top = 244
        Width = 556
        Height = 19
        Align = alBottom
        Alignment = taLeftJustify
        BevelOuter = bvLowered
        TabOrder = 2
        object Label16: TLabel
          Left = 10
          Top = 4
          Width = 84
          Height = 12
          Caption = '正在ping的地址'
        end
        object cbAddToTree3: TCheckBox
          Left = 422
          Top = 3
          Width = 129
          Height = 14
          Anchors = [akTop, akRight]
          Caption = '自动加入搜索目录树'
          TabOrder = 0
        end
      end
    end
    object SendMsgTabSheet: TTabSheet
      Caption = '发送消息'
      ImageIndex = 4
      object Splitter1: TSplitter
        Left = 0
        Top = 190
        Width = 556
        Height = 3
        Cursor = crVSplit
        Align = alBottom
      end
      object memMsg: TMemo
        Left = 0
        Top = 17
        Width = 556
        Height = 148
        Align = alClient
        TabOrder = 0
      end
      object Panel7: TPanel
        Left = 0
        Top = 165
        Width = 556
        Height = 25
        Align = alBottom
        BevelInner = bvLowered
        BevelOuter = bvNone
        TabOrder = 1
        object btnSendMsg: TSpeedButton
          Left = 305
          Top = 4
          Width = 57
          Height = 17
          Anchors = [akTop, akRight]
          Caption = '发送消息'
          OnClick = btnSendMsgClick
        end
        object Label17: TLabel
          Left = 8
          Top = 8
          Width = 96
          Height = 12
          Caption = '主机名或IP地址:'
        end
        object cbToHost: TComboBox
          Left = 112
          Top = 2
          Width = 186
          Height = 20
          Anchors = [akLeft, akTop, akRight]
          ItemHeight = 0
          TabOrder = 0
        end
        object cbClearMsg: TCheckBox
          Left = 467
          Top = 6
          Width = 84
          Height = 14
          Anchors = [akTop, akRight]
          Caption = '发送后清空'
          TabOrder = 1
        end
      end
      object lvSendMsg: TListView
        Left = 0
        Top = 193
        Width = 556
        Height = 70
        Align = alBottom
        Columns = <
          item
            Caption = '目的主机'
            Width = 100
          end
          item
            Caption = '发送内容'
            Width = 250
          end
          item
            Caption = '发送结果'
            Width = 150
          end>
        ColumnClick = False
        GridLines = True
        RowSelect = True
        PopupMenu = PopupMenu1
        TabOrder = 2
        ViewStyle = vsReport
        OnDblClick = lvSendMsgDblClick
      end
      object Panel8: TPanel
        Left = 0
        Top = 0
        Width = 556
        Height = 17
        Align = alTop
        Alignment = taLeftJustify
        BevelOuter = bvLowered
        Caption = ' 请输入想要发送的内容:'
        TabOrder = 3
      end
    end
    object NbtDbTabSheet: TTabSheet
      Caption = 'Nbtstat记录'
      ImageIndex = 5
      object Splitter2: TSplitter
        Left = 0
        Top = 73
        Width = 556
        Height = 3
        Cursor = crVSplit
        Align = alTop
      end
      object lvNbtDb: TListView
        Left = 0
        Top = 76
        Width = 556
        Height = 168
        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 = 0
        ViewStyle = vsReport
      end
      object Panel9: TPanel
        Left = 0
        Top = 0
        Width = 556
        Height = 73
        Align = alTop
        BevelOuter = bvNone
        TabOrder = 1
        object lvSearchResult: TListView
          Left = 0
          Top = 28
          Width = 556
          Height = 45
          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
          ShowHint = False
          TabOrder = 0
          ViewStyle = vsReport
        end
        object Panel10: TPanel
          Left = 0
          Top = 0
          Width = 556
          Height = 28
          Align = alTop
          BevelOuter = bvLowered
          TabOrder = 1
          object Label18: TLabel
            Left = 8
            Top = 8
            Width = 36
            Height = 12
            Caption = '检索:'
          end
          object Label19: TLabel
            Left = 208
            Top = 8
            Width = 6
            Height = 12
            Caption = '='
          end
          object cbField: TComboBox
            Left = 47
            Top = 3
            Width = 145
            Height = 20
            Style = csDropDownList
            ItemHeight = 0
            TabOrder = 0
          end
          object btnSearchField: TButton
            Left = 488
            Top = 5
            Width = 59
            Height = 19
            Anchors = [akTop, akRight]
            Caption = '确定'
            TabOrder = 1
            OnClick = btnSearchFieldClick
          end
          object edtSearch: TEdit
            Left = 232
            Top = 4
            Width = 243
            Height = 20
            Anchors = [akLeft, akTop, akRight]
            TabOrder = 2
          end
        end
      end
      object Panel11: TPanel
        Left = 0
        Top = 244
        Width = 556
        Height = 19
        Align = alBottom
        Alignment = taLeftJustify
        BevelOuter = bvLowered
        TabOrder = 2
        object Label20: TLabel
          Left = 10
          Top = 4
          Width = 36
          Height = 12
          Caption = 'number'
        end
        object btnSort: TSpeedButton
          Left = 511
          Top = 2
          Width = 41
          Height = 16
          Anchors = [akTop, akRight]
          Caption = '排序'
          OnClick = btnSortClick
        end
      end
    end
  end
  object PopupMenu1: TPopupMenu
    OnPopup = PopupMenu1Popup
    Left = 196
    Top = 103
    object N1: TMenuItem
      Caption = '清空列表'
      OnClick = N1Click
    end
    object N2: TMenuItem
      Caption = '保存列表'
      OnClick = N2Click
    end
  end
  object SaveDlg: TSaveDialog
    DefaultExt = 'txt'
    FileName = 'LAN_log'
    Filter = '*.txt|*.txt'
    Left = 316
    Top = 142
  end
end

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -